﻿Imports System.Text

Module MWordUtil

    Friend P_ADD_FIRST_WORD_IDX As Boolean = False
    Friend P_IN_ING As Boolean = False
    Friend P_ZCS_ZHCHSH As Boolean = True

    Private gbk As String = "啊阿呵吖嗄腌锕錒爱矮挨哎碍癌艾唉哀蔼隘埃皑呆嗌嫒瑷暧捱砹嗳锿霭乂乃伌僾儗凒剀剴叆呃呝啀嘊噫噯堨塧壒奇娭娾嬡嵦愛懓懝敱敳昹曖欬欸毐溰溾濭烠焥璦皚皧瞹硋磑礙絠薆藹諰譪譺賹躷醷鎄鑀閡阂阨阸隑靄靉餲馤騃鯦鱫鴱崖按安暗岸俺案鞍氨胺厂广庵揞犴铵桉谙鹌埯黯侒儑匼厈咹唵啽垵垾堓婩媕屽峖干晻洝玵痷盒盦盫碪罯腤荌菴萻葊蓭裺誝諳豻貋遃鉗銨錌钳闇陰隂隌雸鞌韽頇頞顸馣鮟鴳鵪鶕昂肮盎仰卬岇昻枊醃醠骯袄凹傲奥熬懊敖翱澳嚣拗媪廒骜嗷坳遨聱螯獒鏊鳌鏖岙厫嗸噢嚻囂垇墺墽奡奧媼嫯岰嶅嶴慠扷抝摮擙柪梎棍泑浇滶澆澚熝爊獓璈眑磝磽礉翶翺芺蔜蝹襖謷謸軪郩鏕镺隞驁鰲鴁鴢鷔鼇饿哦额鹅蛾扼俄讹阿遏峨娥恶厄鄂锇谔垩锷阏萼苊轭婀莪鳄颚腭愕呃噩鹗屙亚亜亞伪佮侉偔偽僞僫匎匼卾吪呝咢咹哑唖啈啊啐啞噁囐囮垭埡堊堨堮妸妿姶娾娿媕屵岋峉峩崿庵廅悪惡戹搕搤搹擜曷枙椏櫮欸歞歹歺洝涐湂玀珴琧痷皒睋砈砐砨砵硆硪磀礘胺蒍蕚蘁蚅蝁覨訛詻誐諤譌讍豟軛軶輵迗遌遻邑鈋鋨鍔鑩閜閼阨阸隘頞頟額顎餓餩騀鬲魤魥鰐鰪鱷鴳鵈鵝鵞鶚齃齶齾恩摁蒽嗯奀峎煾饐唔咹哏而二耳儿饵尔贰洱珥鲕鸸佴迩铒侕児兒刵咡唲嬭尒尓峏弍弐杒栭栮樲毦洏渪濡爾粫耏聏胹臑荋薾衈袻誀貮貳趰輀輭轜邇鉺陑陾隭餌駬髵髶鮞鴯偶呕欧藕鸥区沤殴怄瓯讴耦區吘吽嘔塸慪抠握摳敺櫙歐毆渥漚澫熰甌紆纡腢膒蓲蕅藲謳遇醧鏂鴎鷗齵把八吧爸拔罢跋巴芭扒坝霸叭靶笆疤耙捌粑茇岜鲅钯魃菝灞仈伯叐哱哵坺垻墢壩夿妭峇弝抜抪捭朳杷柭欛湃炦犮玐癹皅矲笩紦罷羓胈茷萆蚆覇詙豝跁軷釛釟鈀颰魞鮁鮊鲃鲌鼥百白摆败柏拜佰伯稗捭呗掰唄庍扒拝挀排擺敗栢派猈竡粨粺絔薜薭襬贁鞁鞴韛百瓸半办班般拌搬版斑板伴扳扮瓣颁绊癍坂钣舨阪瘢並分坢埿姅岅彬怑搫攽斒昄朌柈湴瓪秚籓粄絆肦蝂螁螌褩覂豳跘辦辧辨辩辬辯鈑鉡闆靽頒魬鳻帮棒绑磅镑邦榜蚌傍梆膀谤浜蒡並嗙垹埲塝嫎峀崗幇幚幫彭徬挷捠搒旁棓牓玤硥稖紡綁縍纺艕蚄蛖蜯螃謗邫鎊鞤騯髈包抱报饱保暴薄宝爆剥豹刨雹褒堡苞胞鲍炮瀑龅孢煲褓鸨趵葆佨儤剝勹勽呆嘐嚗堢報媬嫑寚寳寶忁怉曓枹珤砲窇笣簿緥菢蕔藵虣蚫袌袍裒裦襃賲鉋鑤铇闁靌靤飹飽駂骲髱鮑鳵鴇齙宀曝被北倍杯背悲备碑卑贝辈钡焙狈惫臂褙悖蓓鹎鐾呗邶鞴孛陂碚俻俾偝偹備僃哱唄喺垻埤怫愂憊揹昁杮柸桮梖棑棓椑波牬犕狽珼琲痺盃禙箃糒苝茀菩萆萯葡藣蛽蜚襬誖諀貝跋軰輩鄁鉳鋇錍鐴骳鵯本奔苯笨夯锛贲畚坌体倴喯夲奙捹撪桳楍泍渀炃燌犇翉蟦輽逩錛鐼蹦绷甭崩迸蚌泵甏嘣伻俸傍傰唪嗙埄埲堋塴奟嵭平抨挷搒旁榜漨熢琣琫痭祊絣綳繃菶跰逬錋鏰镚閍鞛比笔闭鼻碧必避逼毕臂彼鄙壁蓖币弊辟蔽毙庇敝陛毖痹秘泌秕薜荸芘萆匕裨畀俾嬖狴筚箅篦舭荜襞庳铋跸吡愎贲滗濞璧哔髀弼妣婢仳佊佖佛偪匂卑咇啚嗶坒埤堛复夶奰妼娝媲嬶屄崥幅幣幤庀廦弻彃怭怶悂愊拂捭斃旇服朼枇枈柀柲梐椑楅檗殍毴沘波湢滭潷煏熚獘獙珌畁畐畢疕疪痺皀皕瞥禆稫笓筆箃箄箆篳粃粊紕紴綼縪繴纰罷罼翍聛肶肸胇脾腗腷苾萞蓽蘗虑蜌螕袐被襅襣觱詖诐豍貏貱費賁贔费赑跛踾蹕躃躄邲鄨鄪鈚鉍錍鎞鏎鐴鐾閇閈閉閟闬陂陴鞁鞞鞸韠飶饆馝馥駜驆髲魓魮鮅鮩鰏鲾鴓鵖鶝鷝鷩鸊鼊边变便遍编辩扁贬鞭卞辨辫忭砭匾汴碥蝙褊鳊笾苄窆弁缏煸変封峅徧惼抃拚揙昪汳炞牑猵獱甂疺稨稹箯籩糄編緶臱艑萹藊覍覵變豍貶辡辦辧辮辯邉邊邲釆鍽閞鞕頨鯾鯿鴘鶣髟表标彪膘杓婊飑飙鳔瘭飚镳裱骠镖俵僄儦剽墂嫖幖徱摽標檦淲滮漂瀌灬熛爂猋穮篻脿膔臕苞蔈藨褾諘謤贆錶鏖鏢鑣颮颷飆飇飈飊驃驫骉鰾麃髟别憋鳖瘪蹩別咇彆徶扒拔捌撆撇柭柲猰癟秘穪苾莂蔽虌蛂蟞襒鱉鼈龞宾濒摈彬斌滨豳膑殡缤髌傧槟鬓镔玢份儐擯椕殯氞汃浜濱濵瀕瑸璸砏繽臏虨蠙訜豩賓賔贇赟邠鑌霦頻顮频髕髩鬂鬢并病兵冰丙饼屏秉柄炳摒槟禀邴並仌併倂偋傡冫垪寎平幷庰怲抦拼掤昞昺枋栟栤梹棅檳氷燷燹琕痭癛癝眪稟窉竝絣綆绠苪蛃誁跰鈵鉼鋲陃靐鞆鞞鞸餅餠鮩疒拨波播泊博伯驳玻剥薄勃菠钵搏脖帛般柏舶渤铂箔膊魄卜礴跛檗亳鹁踣啵蕃簸钹饽擘仢佛侼僠僰剝募哱噃嚗壆妭孛孹嶓帗彴怕愽懪拍拔挬撥擗暴服柭桲榑檘欂殕泼浡淿湐潑潘瀑煿爆牔犦犻狛猼瓝瓟番癶發白百皪盋砵碆磻礡秡穛笩箥簙簿糪紴缽肑胉艊艴苩茀茷菩葧蒲蔔蔢薜蘖蘗蚾袚袯袹襎襏襮詙譒豰趵跑蹳郣鈸鉑鉢鋍鎛鑮镈餑餺馎馛馞駁駮驋髆髉鮁鮊鱍鲅鲌鵓掰不另步补布部捕卜簿哺堡埠怖埔瓿逋晡钸钚醭卟佈僕勏吥咘埗婄尃峬庯廍悑抪拊捗捬撲擈柨歨歩溥獛秿箁篰荹蔀薄補誧踄輹郶鈈鈽附陠鞴餔餢鯆鳪鵏大答达打搭瘩塔笪耷哒褡疸怛靼妲沓嗒鞑亣剳匒呾咑噠垯塌墶憚搨撘橽毼汏溚炟燵畗畣眔矺笚繨羍胆荅荙薘蟽觰詚跶躂迏迖迭逹達鎉鎝鐽韃龖龘带代呆戴待袋逮歹贷怠傣大殆呔玳迨岱甙黛骀绐埭侢叇嘚垈帒帯帶廗懛曃柋棣毒汏瀻獃瑇箉簤紿緿艜蔕蚮蝳螮襶詒诒貸跢蹛軑軚軩轪逯遞遰隶霴靆馱駄駘驮鮘鴏黱但单蛋担弹掸胆淡丹耽旦氮诞郸惮石疸澹瘅萏殚眈聃箪赕儋啖丼亶伔倓僤儃冄冉刐勯匰単呾唌啗啿單嘾噉噡嚪坛壇妉娊媅帎弾彈忱怛惔愖憚憺憾抌撢撣擔柦檐欿殫沊泹湛潭澶澸燀狚玬瓭甔疍癉癚皽砃禫窞簞紞繵耼聸腅膻膽蜑蜒蟺衴褝襌襜覘觇觛訑詹誕譂贉贍赡蹛躭鄲酖醈霮頕餤饏馾駳髧鴠黕黮黵当党挡档荡谠铛宕菪凼裆砀偒儅噹圵场垱場壋婸崵嵣愓擋攩檔欓氹潒澢灙烫燙珰瑒璗璫瓽當瘍盪瞊碭礑筜簜簹艡蕩蘯蟷襠譡讜趤逿鐺闣雼黨到道倒刀岛盗稻捣悼导蹈祷帱纛忉焘氘叨俦儔受啁嘄噵壔宲導屶島嶋嶌嶹幬忑惆捯搗擣朷椡槝檤檮洮涛濤燾瓙盜禂禱稲箌絩翢翿舠菿薵虭衜衟裯軇醻釖陦陶隝隯魛鱽鳥鸟刂的地得德底锝嘚徳恴悳惪棏淂登鍀陟得哋揼等灯邓登澄瞪凳蹬磴镫噔嶝戥簦僜墱嬁憕橙櫈燈璒竳艠覴豋鄧鐙隥地第底低敌抵滴帝递嫡弟缔堤的涤提笛迪狄翟蒂觌邸谛诋嘀柢骶羝氐棣睇娣荻碲镝坻籴砥仾俤偙僀儥勺厎呧唙啇啲啻嚁坔坘埅埊埞墆墑墬奃媂嵽嶳廸弔弚弤彽怟慸扚拞掋揥摕敵旳杓杕枤梊梑楴樀浟渧滌焍牴玓珶甋疐眱碮磾祶禘篴糴約締约聜肑胝腣芍苐苖莜菂菧蓧蔋蔐蔕藋藡蚳蝃螮袛覿觝詆諟諦豴赿趆踧踶蹄蹏蹢軧逐逮遞適遰釱鉪鍉鏑阺隄隶靮鞮頔題题馰髢魡鯳鸐嗲低点电店殿淀掂颠垫碘惦奠典佃靛滇甸踮钿坫阽癫簟玷巅癜佔傎厧唸埝墊壂奌婝婰嵮巓巔扂拈攧敁敟椣槇槙橂橝沾涎湺澱琔痶瘨癲磹腍蒧蕇蜓蜔詀蹎鈿電頕顚顛驔點齻丶掉钓叼吊雕调刁碉凋鸟铞铫鲷貂伄佻倜刀刟奝嬥屌弔弴彫扚挑椆殦汈淍琱瘹瞗矵稠窎窵竨簓粜糶絩綢绸莜蓧藋虭蛁蜩訋誂調赵趙跳踔軺轺釣鈟銱鋽錭鑃雿颩骠魡鮉鯛鳥鳭鵃鵰鸼鼦爹跌叠碟蝶迭谍牒堞瓞揲蹀耋鲽垤喋佚咥哋啑峌崼嵽幉怢恎惵戜挃挕昳曡柣楪槢殜氎泆涉渉渫牃畳疂疉疊眣眰窒絰绖耊胅至臷艓苵蜨螲褋褶褺詄諜趃跕跮踢蹛軼轶鐡鐵镻鞢鮙鰈鰨鳎踮低顶定盯订叮丁钉鼎锭町玎铤腚碇疔仃耵酊啶奠奵嵿帄忊掟椗汀濎灯甼矴碠磸聢艼萣葶薡虰訂釘鋌錠鐤靪頂顁飣饤鼑丢铥丟銩颩动东懂洞冻冬董栋侗恫峒鸫垌胨胴硐氡岽咚倲働凍動勭埬墥姛娻嬞峝崠崬戙挏揰昸東桐棟氭涷湩烔燑狫甬笗筒筩箽絧腖苳菄蕫蝀衕詷諌迵酮霘駧騆鮗鯟鶇鶫鼕夂都斗豆逗陡抖痘兜读蚪窦篼蔸乧侸兠凟剅吺唗投斣枓梪橷毭氀浢渎瀆瞗窬竇脰艔荳讀逾郖酘酡鈄鋀钭閗闘阧餖饾鬥鬦鬪鬬鬭读度毒渡堵独肚镀赌睹杜督都犊妒顿蠹笃嘟渎椟牍黩髑芏儥凟剢剫匵厾噣土塗妬嬻宅帾斁晵暏樚樞橐櫝殬殰涜瀆牘犢獨琽瓄皾睪秺竇竺笁篤纛荰蝳螙蠧裻襡襩覩詫読讀讟诧豄賭贕醏錖鍍鍺鑟锗闍阇陼靯韇韣韥頓騳黷段短断端锻缎椴煅簖偳剬塅媏彖斷毈瑖碫篅籪緞耑腶葮褍踹躖鍛鍴对队堆兑敦镦碓怼憝兊兌垖埻塠夺奪対對嵟憞懟搥杸濧濻瀢瀩痽磓祋綐膭薱謉譈譵追鈗銳鋭錞鎚鐓鐜锐陮隊頧鴭吨顿蹲墩敦钝盾囤遁不趸沌盹镦礅炖砘伅俊噸墪壿庉忳惇憞撉撴楯橔潡燉犜獤碷腞腯蜳豚踲蹾躉逇遯鈍鐓鐜頓驐多朵夺舵剁垛跺惰堕掇哆驮度躲踱沲咄铎裰哚缍亸仛兊兌兑凙刴剟剫吋喥嚉嚲垜埵墮墯夛奪奲媠嫷尮崜嶞憜挅挆捶揣敓敚敠敪朶杂杕枤柁柂柮桗棰椯橢毲沰沱澤痥硾綞茤袳詑誃貀趓跢跥跿躱軃郸鄲鈬錞鍺鐸锗陀陊陏隋隓飿饳馱駄鬌鮵鵽點发法罚伐乏筏阀珐垡砝佱傠姂廢彂拔拨撥栰橃汎沷泛灋琺疺発發瞂笩罰罸茷蕟藅貶贬醗醱鍅閥髪髮反饭翻番犯凡帆返泛繁烦贩范樊藩矾钒燔蘩畈蕃蹯梵幡仮伋凢凣勫匥噃墦奿婏嬎嬏嬔忛憣払拚旙旛杋柉棥楓橎氾汎渢滼瀪瀿煩犿璠畨盕礬笲笵範籓籵緐繙羳膰舤舧舩薠蟠蠜袢襎訉販軓軬轓辺釩鐇颿飜飯飰鱕鷭攵犭放房防纺芳方访仿坊妨肪钫彷邡枋舫鲂倣匚埅堏旊昉昘昞汸淓牥瓬眆眪祊紡蚄訪趽鈁錺雱髣魴鰟鳑鴋鶭非飞肥费肺废匪吠沸菲诽啡篚蜚腓扉妃斐狒芾悱镄霏翡榧淝鲱绯痱俷剕厞墢奜婓婔屝廃廢怫拂昲暃曊朏杮柹棐橃橨櫠渄濷犻猆琲疿癈砩祓笰紼緋绋胇胏胐茀茇萉蕜蕟蕡蜰蟦裴裵裶襏誹費鐨陫靅靟飛飝餥馡騑騛髴鯡鼣鼥分份芬粉坟奋愤纷忿粪酚焚吩氛汾棼瀵鲼玢偾鼢僨匪喷噴坆坋墳奔奮妢岎帉幩弅愍憤扮拚敃昐朆朌枌梤棻橨歕濆炃燌燓燔獖盼瞓砏秎竕糞紛羒羵翂肦膹葐蒶蕡蚠蚡衯訜豮豶賁贲躮轒鈖錀鐼隫雰頒颁餴饙馚馩魵鱝鳻黂黺鼖风封逢缝蜂丰枫疯冯奉讽凤峰锋烽砜俸酆葑沣唪仹偑僼凨凬凮埄堸夆妦寷峯崶捀捧摓桻楓檒沨泛浲渢湗溄漨灃炐焨煈熢犎猦琒甮瘋盽碸篈綘縫肨舽艂莑蘕蘴蚌覂諷豊豐賵赗逄鄷鋒鎽鏠靊風馮鳯鳳鴌鵬鹏佛仏仸坲梻否缶不垺妚炰紑缹缻芣衃雬鴀副幅扶浮富福负伏付复服附俯斧赴缚拂夫父符孵敷赋辅府腐腹妇抚覆辐肤氟佛俘傅讣弗涪袱市甫釜脯腑阜咐黼砩苻趺跗蚨芾鲋幞茯滏蜉拊菔蝠鳆蝮绂绋赙罘稃匐麸凫桴莩孚馥驸怫祓呋郛芙艴黻不乀仅伕俌俛偩偪冨冹刜包呒咈哹哺嘸坿垘垺報妋姇娐婏婦媍嬎嬔宓尃岪峊巿帗弣彳彿復怀怤懯抙捊捬掊撫旉枎枹柎柫柭栿棴椨椱榑汱沕沸泭洑溥澓炥烰焤玞玸琈璷甶畉畐畗癁盙砆祔禣秿稪竎笰筟箁箙簠粰糐紨紱紼絥綍綒緮縛纀罦翇胕膚艀芣茀荂荴莆萉萯葍蓲蕧虙蚥蚹蛗蜅蝜衭袚袝複褔襆襥覄訃詂諨豧負費賦賻费踾軵輔輹輻还邚邞郍郙鄜酜酻釡鈇鉘鉜錇鍑鍢锫阝陚鞴韍韛韨頫颫颰駙髴鬴鮄鮒鮲鰒鳧鳬鳺鴔鵩鶝麩麬麱噶胳夹嘎咖轧钆伽旮尬尕尜呷嘠玍軋釓錷魀该改盖概钙芥溉戤垓丐陔赅乢侅匃匄咳姟峐忋摡晐杚核槩槪汽漑瓂畡磑祴絠絯胲荄葢蓋該豥賅賌郂鈣鎅閡阂阣隑骸赶干感敢竿甘肝柑杆赣秆旰酐矸疳泔苷擀绀橄澉淦尴坩个乹乾亁仠佄倝凎凲咁奸尲尶尷幹忓扞捍攼桿榦檊汗汵浛漧灨玕玵皯盰稈笴筸篢簳粓紺芉虷衦詌諴豃贑贛趕迀釬錎飦骭魐鰔鱤鳡鳱刚钢纲港缸岗杠冈肛扛筻罡戆亢伉冮剛堈堽岡崗戅戇抗掆棡槓溝焵牨犅犺疘矼碙綱罁罓肮釭鋼鎠阬頏颃高搞告稿膏篙羔糕镐皋郜诰杲缟睾槔锆槁藁勂吿咎夰峼暠槀槹橰檺櫜浩滜澔獋獔皐睪祮祰禞稁稾筶縞羙臯菒蒿藳誥鋯鎬韟餻髙鷎鷱鼛个各歌割哥搁格阁隔革咯胳葛蛤戈鸽疙盖屹合铬硌骼颌袼塥虼圪镉仡舸鬲嗝膈搿纥哿介佫佮個匌可吤呄嘅嘢噶彁愅戓戨扢挌擱敋杚槅櫊浩滆滒澔牫牱犵猲獦砝秴箇紇肐臈臵茖菏蓋蛒裓觡詥諽謌輵轕鉀鉻鉿鎑鎘鎶钾铪閘閣閤闸鞈鞷韐韚頜騔髂魺鮥鮯鰪鲄鴐鴚鴿鵅给給跟根哏茛亘艮揯搄痕更耕颈梗耿庚羹埂赓鲠哽绠亙亢刯堩峺恆挭掶暅椩浭焿畊硬絙絚綆緪縆羮莄菮賡邢郉郠頸骾鯁鶊鹒工公功共弓攻宫供恭拱贡躬巩汞龚红肱觥珙蚣匑匔厷咣唝嗊塨宮幊廾愩慐拲杛杠栱渱熕碽篢糼紅羾虹蛩觵貢贑贛赣躳輁銾鞏髸魟龏龔够沟狗钩勾购构苟垢句岣彀枸鞲觏缑笱诟遘媾篝佝傋冓区區呴坸夠姤抅拘搆撀構泃溝煹玽簼緱耇耈耉茩蚼袧褠覯訽詬豰豿購軥鈎鉤雊韝鮈鴝鸜鸲古股鼓谷故孤箍姑顾固雇估咕骨辜沽蛊贾菇梏鸪汩轱崮菰鹄鹘钴臌酤呱鲴诂牯瞽毂锢牿痼觚蛄搡罟嘏傦僱凅劷告哌唂唃啒嗀嗗堌夃嫴尳峠崓怘愲扢抇枯柧棝榖榾橭櫎泒淈滑濲瀔焸瓠皋皷盬硲磆祻稒穀笟箛篐糓縎罛羖胍脵臯苦苽蓇薣蛌蠱角詁賈軱軲轂逧鈲鈷錮頋顧餶馉骰鮕鯝鴣鵠鶻鼔挂刮瓜寡剐褂卦呱胍鸹栝诖冎剮劀叧咶咼啩坬惴掛歄焻煱絓緺罣罫舌苽詿諣趏踻銛銽铦颪颳騧鴰括怪拐乖掴叏哙噲夬恠枴柺箉罫关管官观馆惯罐灌冠贯棺纶盥矜莞掼涫鳏鹳倌丱串卝婠悹悺慣懽摜斡果桄樌櫬權毌沦泴淉淪潅爟琯瓘痯瘝癏矔礶祼窤筦綸罆舘菅萖蒄覌観觀貫躀輨遦錧鏆鑵閞関闗關雚館鰥鱞鱹鳤鵍鸛光广逛桄犷咣胱侊俇僙垙姯広廣恍扩挄撗擴横櫎欟洸潢灮炗炚炛烡獷珖硄臦臩茪趪輄迋銧黆归贵鬼跪轨规硅桂柜龟诡闺瑰圭刽傀癸炔庋宄桧刿鳜鲑皈匦妫晷簋炅亀伪佹偽僞劊劌匭匮匱厬哇垝姽娃媯嫢嬀嶡嶲巂帰庪廆恑摫撌攰攱昋朹桅椝椢概槣槶槻槼檜櫃櫰櫷歸氿沩洼湀溎潙珪璝瓌癐瞆瞡瞶硊祈祪禬窐筀簂絵繪绘胿膭茥蓕蘬蛫螝蟡袿襘規觖觤詭謉貴赽趹蹶軌邽郌閨陒隗雟鞼騩鬶鬹鮭鳺鴂鴃滚棍辊鲧衮磙绲丨惃棞浑混渾滾琯璭睔睴緄緷蓘蔉袞裷謴輥錕锟鮌鯀鰥鳏过国果裹锅郭涡埚椁聒馘猓崞掴帼呙虢蜾蝈划咶咼唬啯嘓囗囯囶囻圀國埻堝墎幗彉彍惈慖搓摑敋枸楇槨櫎活淉渦漍濄瘑矌簂粿綶聝腂腘膕菓蔮蜮蝸蟈蠃褁輠過鈛錁鍋鐹锞餜馃哈蛤虾铪丷吓呵奤妎為獬蝦鉿还海害咳氦孩骇骸亥嗨醢胲侅咍咴嗐嚡塰拸欬烸猲絯還郂酼閡阂頦颏餀饚駭駴嘿喊含汗寒汉旱酣韩焊涵函憨翰罕撼捍憾悍邯邗菡撖瀚阚顸蚶焓颔晗鼾仠佄傼兯凾厂厈咁哻唅嚂圅垾娢嫨屽崡嵅嵌忓感扞攼旰晘晥暵桿梒椷榦欦歛汵泔浛浫涆淊淦滩漢澉澏澣灘熯爳猂琀甘甝皔睅矸笒筨糮肣莟蔊蘫虷蛿蜬蜭螒譀谽豃軒轩釬鈐銲鋎鋡钤閈闞闬雗靬韓頇頜頷顄顩馠馯駻鬫魽鳱鶾行巷航夯杭吭颃沆绗珩垳妔忼斻桁炕狼笐筕絎肮苀蚢貥迒邟酐頏魧好号浩嚎壕郝毫豪耗貉镐昊颢灏嚆蚝嗥皓蒿濠薅傐儫呺哠唬嘷噑妞恏悎昦晧暠暤暭曍椃淏滈滜澔灝獆獋皋皜皞皡皥睾秏竓籇翯聕膠臯茠薃薧藃號虠蠔諕譹鄗鎒鎬鐞顥鰝和喝合河禾核何呵荷贺赫褐盒鹤菏貉阂涸吓嗬劾盍翮阖颌壑诃纥曷佫呙呼咊咼哈哬啝喛嗃嗑噈嚇垎姀害寉峆惒愒抲挌揭敆柇格楁欱毼洽渇渮渴湼澕焃煂熆熇燺爀犵狢癋皬盇盉硅碋礉秴篕籺粭紇繳缴翯苛萂藃藿蚵蝎螛蠚袔覈訶訸詥謞貈賀輅轄辂辖郃鉌鑉閡闔阋隺霍靍靎靏鞨頜餄餲饸鬩魺鲄鵠鶡鶮鶴鸖鹄鹖麧齃齕龁龢黑嗨嬒潶黒嘿很狠恨痕佷哏噷拫掀艮詪鞎横恒哼衡亨行桁珩蘅佷啈堼姮恆悙橫涥烆狟胻脝訇鑅鴴鵆鸻红轰哄虹洪宏烘鸿弘讧訇蕻闳薨黉荭泓仜厷叿吰吽哅唝嗊嚝垬妅娂宖屸巆彋愩揈撔晎汪汯浤浲港渱渹潂澋澒灴焢玒玜瓨硔硡竑竤篊粠紅紘紭綋纮羾翃翝耾舼苰葒葓訌謍谹谼谾軣輷轟鈜鉷銾鋐鍧閎閧闀闂霐霟鞃鬨魟鴻黌后厚吼喉侯候猴鲎篌堠後逅糇骺瘊吽呴垕帿洉犼睺矦翭翵腄葔詬诟豞郈鄇銗鍭餱鮜鯸鱟鲘齁湖户呼虎壶互胡护糊弧忽狐蝴葫沪乎戏核和瑚唬鹕冱怙鹱笏戽扈鹘浒祜醐琥囫烀轷瓠煳斛鹄猢惚岵滹觳唿槲乕俿冴匢匫喖嗀嗃嘑嘝嚛垀壷壺姱婟媩嫭嫮寣帍幠弖怘恗戯戱戲戶戸抇搰摢擭昈昒曶枑楛楜槴歑殻汩汻沍泘洿淈淲淴滬滸濩瀫焀熩瓡瓳礐穫箎箶簄粐絗綔縎縏縠羽胍膴舗芐芔芦芴苦苸萀蔛蔰虍虖虝螜衚觷許謼護许豰軤鄠鈷鋘錿鍙鍸钴隺雇雐雽韄頀頶餬鬍魱鯱鰗鱯鳠鳸鴩鵠鶘鶦鶮鶻鸌话花化画华划滑哗猾豁铧桦骅砉侉劃劐吪哇嘩埖姡婲婳嫿嬅学學崋找搳摦撶敌杹椛槬樺檴浍澅澮獪璍畫畵硴磆稞粿糀繣腂舙芲華蒍蕐蘤蘳螖觟話誮諙諣譁譮輠釪釫鋘錵鏵驊魤鮭鲑鷨黊坏怀淮槐徊划踝佪咶喟嘳圳坯壊壞懐懷櫰瀤耲蘹蘾褢褱换还唤环患缓欢幻宦涣焕豢桓痪漶獾擐逭鲩郇鬟寰奂锾圜洹萑缳浣喚喛嚾圂垸堚奐孉寏峘嵈巜愌懁懽換援攌梙槵欥歓歡汍渙潅澣澴灌烉煥犿狟瑍瑗環瓛瘓皖眩睆睔瞏瞣糫絙綄緩繯羦肒脘荁萈蒝藧螌蠸讙豩豲貆貛輐轘還酄鉮鍰鐶镮闤阛雈雚驩鯇鯶鰀鴅鵍鸛鹮鹳黄慌晃荒簧凰皇谎惶蝗磺恍煌幌隍肓潢篁徨鳇遑癀湟蟥璜偟兤喤堭塃墴奛媓宺崲巟怳愰揘晄曂朚楻榥櫎汻洸滉炾熀熿爌獚瑝皝皩穔縨艎芒茫葟衁詤諻謊趪鍠鎤鐄锽韹餭騜鰉鱑鷬黃回会灰绘挥汇辉毁悔惠晦徽恢秽慧贿蛔讳徊卉烩诲彗浍珲蕙喙恚哕晖隳麾诙蟪茴洄咴虺荟缋佪僡儶匯叀嘒噅噕噦嚖囘囬圚堕墮壞婎媈孈寭屷幑廆廻廽彙彚徻恛恵憓懳拻揮撝暉暳會桧椲楎槥橞檅檓檜櫘毀毇沬泋洃涣湏滙潓澮濊瀈灳烜烠烣煇煒燬燴獩琿璤璯痐瘣皓眭睢睳瞺禈穢篲絵繢繪翙翚翬翽芔蒐蔧薈薉藱蘬蘳虫蚘蛕蜖螝袆褘襘詯詼誨諱譓譭譮譿豗賄輝輠违迴逥違銊鏸鐬闠阓隓靧鞼韋韢韦頮顪餯鮰鰴鼿齀溃混昏荤浑婚魂阍珲馄溷诨俒倱圂婫忶惛惽慁挥捆掍揮昆昬梡梱棍棔殙涽渾湣湷焄焝琿眃睧睯緄緍緡繉绲缗葷蔒觨諢轋閽顐餛餫鼲颡或活火伙货和获祸豁霍惑嚯镬耠劐藿攉锪蠖钬夥佸俰剨化吙咊咟嗀嚄嚿奯姡扮捇掝搉擭旤曤楇檴沎湱漷濊濩瀖灬焃獲瓠癨眓矆矐礊禍秮秳穫篧耯腘膕臛艧萿蒦諕謋豰貨越趏過邩鈥鍃鑊閄隻雘靃騞魊擦拆礤嚓傪囃攃橴磣礸蔡遪才菜采材财裁猜踩睬蔡彩倸偲啋埰婇寀戝扐採揌棌綵縩纔財跴乲蚕残掺参惨惭餐灿骖璨孱黪粲傪儏參叄叅喰嘇噆囋嬠嬱嵾慘慙慚憯戔摲朁殘淺湌澯燦爘穇篸薒蝅蠶蠺謲蹔鏒飡飱驂鯵鰺鲹黲藏仓沧舱苍伧仺倉傖凔匨嵢欌滄濸獊瑲篬罉臧艙蒼蔵螥賶鑶鶬鸧草操曹槽糙嘈艚螬漕傮屮嶆愺慅慒懆撡曺澡肏艸艹蓸褿襙造鄵鏪鐰騲册侧策测厕恻側冊厠墄嫧帻幘廁惻憡拺敇柵栅測畟笧筞筴箣簎粣荝萗萴蓛赦齰刂参岑涔參叄叅嵾梣汵硶穇笒篸膥曾层蹭噌僧增層嶒橧竲繒缯驓硛硳岾猠乽查插叉茶差岔搽察茬碴刹诧楂槎镲衩汊馇檫姹杈锸嚓仛侘偛剎嗏土垞奼岎嵖扠扱挿捈捷接揷摖斜査梌猹疀秅紁肞臿艖芆苴荖荼褨訍詧詫蹅釵銟鍤鎈鑔钗靫餷喳柴拆差豺钗瘥虿侪儕勑叉喍囆扠搓查犲祡茈茝蔕蠆袃訍釵齜龇产缠掺搀阐颤铲谗蝉单馋觇婵蒇谄冁廛孱蟾羼镡忏潺禅骣躔澶丳亶佔僝僤儃儳兎兔刬剗剷劖単厘啴單嘽嚵囅團墠壥嬋嬗崭嵼嶃嶄巉幝幨憚懴懺掸摌摲摻撣攙斺旵梴棎榐欃毚沾浐渐湹滻漸潹瀍瀺灛煘燀獑產産硟磛禪簅緂緾繟繵纏纒胀脠艬苫蕆螹蟬蟺袩裣裧襌襜襝覘誗諂譂讇讒讖谶蹍辿鄽酁醦鉆鋋鋓鏟鑱镵閳闡韂顫饞长唱常场厂尝肠畅昌敞倡偿猖裳鲳氅菖惝嫦徜鬯阊怅伥昶苌娼仧倀倘僘償儻兏厰嘗嚐場塲尙尚廠悵晿暢棖椙淌淐焻玚琩瑒瑺瓺甞畼脹腸膓萇蟐裮誯鋹鋿錩鏛锠長镸閶闛韔鯧鱨鲿鼚朝抄超吵潮巢炒嘲剿绰钞怊焯耖晁仦仯劋勦唠嘮巐巣弨摷槱樔欩涛漅濤焣煼牊眧窲粆紹綤綽縐繛绉绍罺觘訬謅謿诌趠趫轈鄛鈔麨鼂鼌车撤扯掣彻尺澈坼砗伡俥偖勶呫唓喢多夛奲宅屮徹揊摰撦斥池烢烲焎爡瞮硨硩聅莗蛼詀謵車迠頙趁称辰臣尘晨沉陈衬橙忱郴榇抻谌碜谶宸龀嗔伧琛侲傖儭嚫堪塡填塵墋夦帘愖捵揨敐曟枕桭棧棽樄櫬沈湛瀋烥煁疢疹瘎瘨眈瞋硶磣稱綝縝缜肜胂茞莀莐蔯薼螴襯訦諃諶謓謲讖賝贂趂趻跈踸軙迧醦鈂鍖闖闯陳霃鷐麎齓齔秤成乘盛撑称城程呈诚惩逞骋澄橙承塍柽埕铖噌铛酲晟裎枨蛏丞瞠乗伥侱倀偁僜净呛嗆埩堘塖娍宬峸嵊庱徎徴徵悜憆憕懲抢挰掁搶摚摤撐撜敞朾棖棦椉槍樘橕橖檉檙氶泟洆浈浧浾淨溗澂瀓瀞爯牚珵珹琤瑲畻盯睈矃碀稱穪窚竀筬絾緽脀脭荿虰蟶觕誠赪赬趟踜蹦郕郢醒鋮鎗鏳鏿鐺阷靗頳饓騁騬鯎黨秤吃尺迟池翅痴赤齿耻持斥侈弛驰炽匙踟坻茌墀饬媸豉褫敕哧瘛蚩啻鸱眵螭篪魑叱彳笞嗤傺佁侙俿剟勅卙卶叺呎呬呮呹哆啸喜喫嘨嘯噄噭坘垑奓她妛屟岻彨彲徲恜恥慗慸憏懘扡抬抶拆拕拖拸捇提搋摛摴攡杘柅柢樆欼歗歭歯汖沱沶治泜淔湁滞滯漦灻烾熾狋瓻痓痸瘈癡眙瞝祇离移竾筂箈箎粚糦絺翄翤翨耛肔胝胣胵脪腟芪茬荎莉菭蚇蚳蛇蝭袲袳裭訵誀誃誺謘謻貾赿趍趐趩跅跢跮踅踶軧迡迣遅遟遫遲邌鉓鉹銐鍉離雴飭飾餝饎饰馳騺驪骊鳷鴟鵄鵣鶗鶙鷘齒齝郗冲重虫充宠崇涌种艟忡舂铳憧茺偅傭僮喠嘃埫寵崈徸憃揰摏樁沖浺漴潼烛爞珫痋盅祌種緟罿翀茧蝩蟲衝褈蹖蹱酮銃隀抽愁臭仇丑稠绸酬筹踌畴瞅惆俦帱瘳雠丒侴偢儔吜嚋圳妯婤媿嬦幬怞懤扭掫揄搊擣杻杽栦椆檮殠溴燽牰犨犫畤疇皗盩眣矁篘籌紬絒綢臰菗薵裯詶謅譸讎讐诌诪跾躊遚酧醔醜醻鈕钮雔魗鮘鯈鲋出处初锄除触橱楚础储畜滁矗搐躇厨雏楮杵刍怵绌亍憷蹰黜蜍樗俶傗儊儲処助嘼埱媰岀幮廚慉懨拀摢摴敊斶柠椘榋槒橻檚櫉櫖櫥欪歜涂淑滀濋炪犓珿琡璴硫礎祝禇竌竐篨絀絮耝耡臅芻菆著蒢蒭蓫蕏藸處蟵蠩褚觕觸詘諔諸诎诸豖豠貙趎跦踀踰躕鄐鉏鋤閦雛鶵鸀齣齭齼屮揣膪啜嘬搋踹欼腄膗穿船传串川喘椽氚遄钏舡舛巛傳僢剶圌堾惴掾暷歂汌猭玔瑏甎篅膞舩荈賗踳踹輲釧镩鶨窗床闯创疮幢怆仓仺倉傸刅刱剏剙創噇囪囱愴戧摐朣橦漴漺牀牎牕瘡磢窓窻膧舂葱蔥闖吹垂炊锤捶椎槌棰陲倕圌埀惙搥桘箠腄菙郵錘鎚顀鬌魋龡春唇纯蠢醇淳椿蝽莼鹑偆僢堾媋惷旾暙朐杶楯槆橁櫄沌浱湻滣漘犉瑃睶箺純肫胊脣膞芚萅萶蒓蓴賰踳輇輴辁醕錞陙鯙鰆鶉鶞戳绰踔啜龊辍促吷嚽娕娖婥婼孎惙拺擉斫歠涰淖焯磭箹簇綴綽繛缀腏荃蔟趠趵跿踱躇輟辵辶逴酫醛鋜錣鏃鑡镞齪齱次此词瓷慈雌磁辞刺茨伺疵赐差兹呲鹚祠糍佌佽偨刾厕厠司呰啙垐堲姕嬨嵯嵳庛廁措朿枱柌柴栜栨泚滋澬濨玼珁甆皉礠粢絘縒胔茈茦茲荠莿萕薋薺蚝蛓螅螆蠀詞賜赼趀趑跐辝辤辭鈶飺餈骴髊鮆鴜鶿鷀齹从丛葱匆聪囱琮枞淙璁骢苁偬叢囪婃孮従徖從忩怱悤悰慒憁暰棇楤樅樬樷欉漎漗潀潈潨灇焧熜燪爜瑽瞛碂窗篵総緫縦縱總繱纵聡聦聰茐菆蓯蔥藂蟌誴謥賨賩鏦騘驄凑凑楱辏腠奏揍族湊玼簇蔟薮藪趋趣趨輳凑粗醋簇促卒徂猝蔟蹙酢殂蹴且卆噈娕娖媨怚憱戚捽瘄瘯皻縐縬绉脨蔍蔖觕誎趋趗趣趥趨踀踓踤踧蹵錯错顣麁麄麆麤鼀窜蹿篡攒汆爨镩撺僔巑攅攛攢昕櫕欑殩濽灒熶穳窾竄篹簒菆襸躥鋑鑹催脆摧翠崔淬衰瘁粹璀啐悴萃毳榱乼伜体倅凗啛墔察崒崪嶉忰慛椊槯漼濢焠熣獕琗疩皠磪竁粋紣綷縗繀缞翆脃脺膬膵臎襊趡踤鏙隹顇村寸存蹲忖皴侟刌吋墫拵洊浚澊竴籿踆邨错撮搓挫措磋嵯厝鹾脞痤蹉瘥锉矬剉剒夎嵳庴摧昔最棤澨營瑳睉縒莝莡蒫蓌蔖虘襊諎躜躦逪遳酂酇醝銼錯髊鹺齹几及急既即机鸡积记级极计挤己季寄纪系基激吉脊际汲肌嫉姬绩缉饥迹棘蓟技冀辑伎祭剂悸济籍寂期其奇忌齐妓继集给革击圾箕讥畸稽疾墼洎鲚屐齑戟鲫嵇矶稷戢虮诘笈暨笄剞叽蒺跻嵴掎跽霁唧畿荠瘠玑羁丌偈芨佶赍楫髻咭蕺觊麂骥殛岌亟犄乩芰哜丮乁亼伋倚偮僟兾刉刏剤劑勣卙卟卽厝叝吇呰喞嗘嘰嚌坖垍堲塉墍妀姞姼尐居屰岋峜嵆嶯帺幾庴廭彐彑彶徛忣惎愱憿懠懻揖揤撃撠撽擊擠攲敧旡旣暩曁枅梞棋楖極槉槣樭機橶檕檝檵櫅櫭毄汥泲洁淁済湒漃漈潗濈濟瀱焏犱狤猗璂璣璾畟疵痵瘵癠癪皀皍睽瞉瞿磯禝禨秸稘稩穄穊積穖穧筓箿簊簎粢糭紀紒級結給継緝縘績繋繫繼结罽羇羈耤耭胔脔脨膌臮艥艻芶苙茍茤莋萁萕葪蒩蔇蕀蕲薊薺藉蘄蘎蘮蘻虀蜡蝍螏蟣蟻蟿蠀裚褀襀襋覉覊覘覬覿觇觌觙觭計訐記誋諅諔譏譤讦谻谿賫賷趌趞跂跡踑踖踦蹐蹟躋躤躸輯轚郅郆鄿銈銡錤鍓鏶鐖鑇鑙隔際隮雞雦雧霵霽鞊鞿韲颳飢饑騎驥骑鬾魝魢魥鮆鯚鯯鯽鰶鰿鱀鱭鱾鳮鵋鶏鶺鷄鷑鸄鹡齊齌齍齎齏家加假价架甲佳夹嘉驾嫁枷荚颊钾稼茄贾铗葭迦戛浃镓痂恝岬跏嘏伽胛笳珈瘕郏袈蛱傢價叚呷咖唊圿埉夏夓夾婽宊幏徦忦戞扴抸押拁拮挈挟挾揩揳擖斚斝暇梜椵榎榢槚檟毠泇浹犌猰猳玾筴糘耞脥腵莢蛺蝦袷裌豭貑賈跲郟鉀鉫鉿鋏鎵铪頡頬頰颉餄饸駕駱骆骱鴶鵊麚见件减尖间键贱肩兼建检箭煎简剪歼监坚奸健艰荐剑渐溅涧鉴浅践捡柬笺俭碱硷拣舰槛缄茧饯翦鞯戋谏牮枧腱趼缣搛戬毽菅鲣笕谫楗囝蹇裥踺睑謇鹣蒹僭锏湔侟俴倹偂傔僣儉冿前剣剱劍劎劒劔喊囏堅堑堿塹墹姦姧孱寋帴幵弿彅徤惤戔戩挸揀揃揵撿擶攕旔暕朁柙栫梘検椷椾榗樫橌橏橺檢檻櫼殱殲洊涀淺減湕滥漸澗濫濺瀐瀳瀸瀽熞熸牋犍猏玪珔瑊瑐監睷瞯瞷瞼碊磵礀礆礛稴筧箋箴篯簡籈籛糋絸緘縑繝繭纎纖纤聻臶艦艱茛菺葌葏葥蔪蕑蕳薦藆虃螹蠒袸襇襉襺見覵覸詃諓諫謭譖譼譾谮豜豣賎賤趝跈踐轞醎醶釰釼鈃銒銭鋄鋑鋻錢錬錽鍊鍳鍵鎫鏩鐗鐧鐱鑑鑒鑬鑯鑳钘钱閒間险險靬鞬韀韉餞餰馢騫骞鬋鰎鰔鰜鰹鳒鳽鵳鶼鹸鹹鹻鹼麉黚黬廴将讲江奖降浆僵姜酱蒋疆匠强桨虹豇礓缰犟耩绛茳糨洚傋勥匞塂壃夅奨奬將嵹弜弶強彊摪摾杢槳橿櫤殭滰漿獎畕畺疅糡紅絳繮红翞膙葁蔃蔣薑螀螿袶講謽醤醬韁顜鱂鳉叫脚交角教较缴觉焦胶娇绞校搅骄狡浇矫郊嚼蕉轿窖椒礁饺铰酵侥剿徼艽僬蛟敫峤跤姣皎茭鹪噍醮佼湫鲛挢乔侨僑僥儌劋勦勪却卻呌咬喬嘂嘄嘐嘦噭妖嫶嬌嬓孂学學峧嵺嶕嶠嶣恔悎憍憢憿挍捁摷撟撹攪敎敥敽敿斠晈暞曒樔橋櫵湬滘漖潐澆激灂灚烄焳煍燋獥珓璬皦皭矯稾穚窌笅筊簥糾絞繳纐纠腳膠膲臫芁茮菽萩蕎藠虠蟜蟭覐覚覺訆譑譥賋趫趭踋蹻較轇轎鄗釂釥鉸鐎餃驕骹鮫鱎鵁鵤鷦鷮纟接节街借皆截解界结届姐揭戒介阶劫芥竭洁疥藉价楷秸桔杰捷诫睫家偈桀喈拮骱羯蚧嗟颉鲒婕碣讦孑疖诘丯亥倢假偼傑價刦刧刼劼卪吤唧唶啑嚌圾堦堺契她妎媎媘媫嫅尐屆岊岕崨嵑嵥嶰嶻巀幯庎徣忦悈扢担拾掲搩擑擮擳斺昅暨曁桝椄楐楬楶概榤構檞櫭毑洯渇渴湝滐潔煯犗狤獬玠琾畍疌痎癤砎砝礍祖稭節籍紇紒結絜繲纥耤脻艐莭菨蓵蛣蛶蜐蝍蝔蠘蠞蠽衱衸袓袷袺裓褯觧訐詰誡誱謯趌跲踕迼鉣鍇鍻锴階雃鞂鞊頡飷髫魝魪鮚鶛卩进近今仅紧金斤尽劲禁浸锦晋筋津谨巾襟烬靳廑瑾馑槿衿堇荩矜噤缙卺妗赆觐伒侭僅僸儘兓凚劤勁厪吟唫嚍埐堻墐壗婜嫤嬐嬧寖嶜巹惍慬搢斳晉枃榗歏殣浕溍漌濅濜煡燼珒琎琻瑨璡璶盡砛祲竻笒紟紾緊縉肋臸荕菫菳蓳藎覲觔訡謹賮贐進釒釿鋟錦钅锓饉馸鹶黅齽竟静井惊经镜京净敬精景警竞境径荆晶鲸粳颈兢茎睛劲痉靖肼獍阱腈弪刭憬婧胫菁儆旌迳靓泾丼亰仱俓倞傹儬凈剄劤勁坓坕坙妌婙婛宑巠幜弳徑憼擏旍晟暻曔桱梷橸檠殑氏汫汬浄涇淨濪瀞烃烴燝猄獷璄璟璥痙秔稉穽竧竫競竸箐粇経經聙脛荊莖葝蜻蟼誩踁逕醒鋞鏡陉陘靑青靘靚靜頚頴颕驚鯨鵛鶁鶄窘炯扃迥侰僒冂冋冏囧坰垧埛宭扄昋泂浻澃瀅炅烱煚煛熒熲燑燛絅綗臦臩蘏蘔褧逈銄鎣顈颎駉駫就九酒旧久揪救纠舅究韭厩臼玖灸咎疚赳鹫蹴僦柩桕鬏鸠阄啾丩乆乣倃剹勼匓匛匶噍奺廄廏廐愁慦捄揂揫摎朻杦柾樛橚殧氿汣湫湬牞畂稵穋窌糺糾紤繆缪舊舏萛蝤镹韮鬮鯦鳩鷲麔齨句举巨局具距锯剧居聚拘菊矩沮拒惧鞠狙驹且据柜桔俱车咀疽踞炬倨醵裾屦犋苴窭飓锔椐苣琚掬榘龃趄莒雎遽橘踽榉鞫钜讵枸仇伡佝侷俥倶僪冣凥劇勮匊告圧坥埧埾壉姐姖娵娶婅婮寠屨岠岨崌巈弆忂怇怐怚愳懅懼抅拠拱挙挶捄揈揟據擧昛梮椇椈檋櫸欅歫毩毱泃泦洰涺淗渠湨澽焗焣爠犑狊珇痀眗瞿砠租秬窶筥篓簍簴籧粔粷罝耟聥腒臄舉艍菹萭葅蒌蒟蒩蓻蔞蘜蘧處虡蚷蛆蜛螶袓襷詎諊豦貗趉趜趡足跔跙跼踘蹫蹻躆躹軥輂邭邹郥郰郹鄒鄹鉅鉏鋤鋦鋸鐻锄閰陱雏雛颶駏駒駶驕驧骄鬻鮈鮍鮔鲏鴡鵙鵴鶋鶪鼰鼳齟卷圈倦鹃捐娟眷绢鄄锩蠲镌狷桊涓隽劵勌勬呟圏埍埢奆姢嶲巂帣弮悁惓慻捲擐朘梋棬泫淃焆獧瓹甄眩睃睊睠絭絹縳罥羂脧腃臇菤萒蔨蕊蕋蜷裐襈讂踡身鋑鋗錈鎸鐫闂雋雟鞙韏飬餋鵍鵑决绝觉角爵掘诀撅倔抉攫嚼脚桷噱橛嗟觖劂爝矍镢獗珏崛蕨噘谲蹶孓厥乙亅傕刔勪匷叏吷啳埆壆夬妜孒屈屩屫崫嶡嶥弡彏憠憰戄挗捔撧斍柽橜欔欮殌氒決泬潏灍焆焳熦燋爑爴狂玃玦玨瑴璚疦瘚矞矡砄穱穴絕絶繑繘腳臄芵蕝蕞虳蚗蛙蟨蟩蠼袦覐覚覺觼訣誳譎貜赽趉趹蹷蹻躩較较逫鈌鐍鐝钁镼闋闕阕阙鞒鞽駃騤骙髉鱖鳜鴂鴃鶌鷢龣军君均菌俊峻龟竣骏钧浚郡筠麇皲捃儁勻匀呁埈姰寯懏攈旬晙桾汮濬焌焞燇狻珺畯皸皹碅箘箟莙葰蔨蚐蜠袀覠訇軍鈞銁銞鋆鍕陖隽雋餕馂駿鮶鲪鵔鵕鵘麏麕龜卡喀咯咖胩咔佧呿垰珈衉裃鉲开揩凯慨楷垲剀锎铠锴忾恺蒈凱剴劾勓喝喫嘅噄塏奒嵦幆愒愷愾暟核欬欯渇渴溘濭炌炏烗衉豈輆鍇鎎鎧鐦開闓闿雉颽看砍堪刊嵌坎槛勘龛戡侃瞰莰阚偘冚凵喊埳堿塪墈崁嵁惂扻栞檻欿歁監矙碪磡竷莶薟衎譼輡輱轁轗闞靬顑餡馅龕抗炕扛糠康慷亢钪闶伉匟囥坑奋嫝嵻忼摃杭槺沆漮犺砊穅粇荒躿邟鈧鏮閌阬骯鱇靠考烤拷栲犒尻铐丂嵪彀挢搞撟攷槀槁洘焅熇燺稾薧藳訄銬髛鮳鯌鲓咳可克棵科颗刻课客壳渴苛柯磕坷呵恪岢蝌缂蚵轲窠钶氪颏瞌锞稞珂髁疴嗑溘骒剋勀勊匼喀堁娔尅峇嵑嵙嶱悈愘愙揢搕敤榼樖欬歁殻毼渇濭炣牁犐痾盍砢硞碣碦磆礊礚窼簻緙翗胢艐萪薖衉袔課趷軻醘鈳鉿錁錒铪锕頦顆騍龕龛刻剋勀勊尅肯啃恳垦裉垠墾懇掯狠珢硍肎肻褃豤貇錹頎颀齦龈坑吭铿劥坈奟妔忐挳揁摼殸牼硁硍硎硜硻胫脛誙踁鉺銵鍞鏗铒阬巪艍乬迲唟厼空孔控恐倥崆箜埪宆悾椌涳矼硿穹羫腔躻錓鞚鵼口扣抠寇蔻芤眍筘叩佝冦剾劶妪嫗宼彄怐挎摳敂毆溝滱眗瞉瞘窛竘簆茠蔲釦鏂鷇哭库苦枯裤窟酷刳骷喾堀绔俈古嚳圐圣崫庫扝挎捁掘搰朏桍楛泏焅狜瘔矻硞秙窋絝胐袴褲趶跍跨郀鮬齁跨垮挎夸胯侉咵姱恗晇楇絓舿華蕐袔誇銙錁锞顝骻髁快块筷会侩哙蒯浍郐狯脍傀儈凷噲圦塊墤巜廥擓旝會澮獪璯糩膾蒉蕢鄶駃鬠魁鱠鲙宽款髋完寛寬梡棵欵歀窽窾鑧顆颗髖矿筐狂框况旷匡眶诳邝纩夼诓圹贶哐丱儣兄劻匩卝壙岲廣忹恇懬懭抂昿曠枉況洭湟爌狅眖矌砿硄磺礦穬筺絋絖纊誆誑貺軖軠軦軭迋逛邼鄺鋛鑛亏愧奎窥葵魁馈盔傀岿匮愦揆睽跬聩篑喹逵暌蒉悝喟馗蝰隗夔刲匱卼嘳媿嬇尯巋巙憒戣晆楏楑樻櫆欳歸殨潰煃瞶磈窺簣籄缺聧聭聵胿腃膭臾蒍蕢藈蘬蘷虁虧觖謉踩蹞躨鄈鍨鍷鐀鑎闋闚阕頃頄頍頯顝顷餽饋騤骙溃捆困昆坤鲲锟髡琨醌阃悃卵堃堒壸壼婫尡崐崑晜梱涃混潉焜熴猑瑻睏硱祵稇稛綑罤臗菎蜫裈裍裩褌豤貇錕閫閸頑顽餛馄騉髠髨鯤鰥鳏鵾鶤鹍齦龈阔扩廓适蛞栝会刳哙噋噲懖拡挄擴會桰漷濶燭爥秳筈萿葀邝鄺闊霩鞟鞹韕頢髺鬠括拉啦辣蜡腊喇垃蓝落瘌邋砬剌旯儠嚹揦揧搚摺擸攋柆楋櫴溂爉瓎癩磖翋臈臘菈藞蝋蝲蠟辢鑞镴鞡鬎鯻鱲癞来赖莱濑赉崃涞铼籁徕睐來俫倈勑厲唻娕婡崍庲徠懶攋梾棶櫴淶瀨瀬猍琜癩睞筙箂籟萊藾襰誺賚賴逨郲釐錸頼顂騋鯠鵣鶆麳黧癞蓝兰烂拦篮懒栏揽缆滥阑谰婪澜览榄岚褴镧斓罱漤僋儖厱啉嚂囒坔壈壏嬾孄孏嵐幱廩廪惏懔懢懶擥攔攬斕暕欄欖欗浨涟湅漣濫瀾灆灠灡炼煉燗燣爁爛爤爦璼瓓礷籃籣糷繿纜葻藍蘫蘭襕襤襴襽覧覽諫譋讕谏躝郴醂鑭钄闌韊顲浪狼廊郎朗榔琅稂螂莨啷锒阆蒗俍勆哴唥埌塱嫏崀悢朖朤桹樃樠欴烺瑯硠筤羮羹脼艆蓈蓢蜋誏踉躴郒郞鋃鎯閬駺老捞牢劳烙涝落姥酪络佬潦耢铹醪铑唠栳崂痨僗僚労勞咾哰嗠嘐嘮嫪嶗恅憥憦撈撩朥橑橯浶澇狫獠珯癆硓磱窂簩粩絡耮荖蓼蛯蟧軂轑銠鐒顟髝鮱了乐勒肋鳓仂叻泐嘞忇扐楽樂氻牞玏砳竻簕艻阞韷餎饹鰳类累泪雷垒勒擂蕾肋镭儡磊缧诔耒酹羸嫘檑嘞傫儽卢厽咧塁壘壨攂樏櫐櫑欙洡涙淚漯灅瓃畾瘣癗盧矋磥礌礧礨祱禷絫縲纇纍纝罍脷腂蔂蕌藟蘱蘲蘽虆蠝誄讄轠郲銇錑鐳鑘鑸靁頛頪類颣鱩鸓鼺冷棱楞愣塄倰堎睖碐稜薐踜輘里离力立李例哩理利梨厘礼历丽吏砾漓莉傈荔俐痢狸粒沥隶栗璃鲤厉励犁黎篱郦鹂笠坜苈鳢缡跞蜊锂悝澧粝蓠枥蠡鬲呖砺嫠篥疠疬猁藜溧鲡戾栎唳醴轹詈骊罹逦俪喱雳黧莅俚蛎娌仂位儮儷凓刕列剓剺劙勵厤厯厲叓叕叻唎嚟嚦囄囇塛壢娳婯孋孷屴岦峛峲巁廲悡悧悷慄扐扚捩搮擽攊攦攭斄暦曆曞朸柂栃栛栵梸棃棙樆檪櫔櫟櫪欐欚歴歷氂沴沵泣浬涖淚濼濿瀝灑灕爄爏犂犛犡珕珞琍瑮瓅瓈瓑瓥癘癧皪盠盭睝矖砅砬硌磿礪礫礰禮禲秝穲竰筣籬粚粴糎糲綟縭纅纚翮脷艃苙茘荲菞蒚蒞蔾藶蘺蚸蛠蜧蝕蝷蟍蟸蠇蠣蠫裏裡褵觻謧讈豊貍赲躒轢轣邌邐酈醨釃釐鉝銐鋫鋰錅錑鎘鏫鑗鑠铄镉隷隸離霾靂靋颯飒驪鬁鬴鯉鯏鯬鱧鱱鱳鱺鳨鴗鵹鷅鸝麗麜连联练莲恋脸炼链敛怜廉帘镰涟蠊琏殓蔹鲢奁潋臁裢濂裣楝亷令僆劆匲匳嗹噒堜奩娈媡嫾嬚孌慩憐戀挛搛摙撿攣斂梿槏槤櫣欄歛殮浰湅溓漣澰濓瀲煉熑燫瑓璉瞵磏稴簾籢籨練縺纞羷羸翴聨聫聮聯膦臉苓莶萰蓮薕薟蘝蘞螊褳襝覝謰譧蹥連鄻醶錬鍊鎌鏈鐮镧零鬑鰊鰱鱄两亮辆凉粮梁量良晾谅俩粱墚靓踉椋魉莨両俍倆倞兩哴唡啢喨悢惊掚樑涼湸煷簗糧綡緉脼蜋蜽裲諒蹒蹣輌輛輬辌鍄閬阆靚駺魎冫了料撩聊撂疗廖燎辽僚寥镣潦钌蓼尥寮缭獠鹩嘹佬僇劳勞嫽尞尦屪嵺嶚嶛廫憀憭摎敹暸樛漻炓爎爒璙療瞭窷竂簝繚膋膫蟉蟟蟧豂賿蹘蹽轑遼鄝釕鏐鐐镠镽飂飉髎鷯列裂猎劣烈咧埒捩鬣趔躐冽洌例倈儠劦劽哷埓奊姴峢巁巤忚挒挘擸栗棙櫑毟浖烮煭燤爄爉犣猟獵睙綟聗脟膊臘茢蛚迾邋颲鬛鮤鱲鴷林临淋邻磷鳞赁吝拎琳霖凛遴嶙蔺粼麟躏辚廪懔瞵檩膦啉亃任伈僯凜厸壣崊廩恡悋惏懍撛斴晽暽橉檁涁渗滲潾澟瀶焛燐獜玪璘甐疄痳癛癝碄稟箖粦繗翷臨菻藺賃蹸躙躪轔轥鄰鏻閵阴隣顲驎魿鱗麐令领零铃玲灵岭龄凌陵菱伶羚棱翎蛉苓绫瓴酃呤泠棂柃鲮聆囹倰冷刢坽夌姈婈孁岺崚嶺彾怜拎掕昤朎櫺欞淩澪瀮炩燯爧狑琌皊砱磷祾秢竛笭紷綾舲蓤蔆蕶蘦衑袊裬詅跉軨輘醽釘鈴錂钉閝阾霊霗霛霝靇靈領駖魿鯪鴒鸰鹷麢齡齢龗六流留刘柳溜硫瘤榴琉馏碌陆绺锍鎏镏浏骝旒鹨熘遛偻僂劉嚠塯媹嬼嵧廇懰抡斿旈栁桞桺橊橮沠泖泵游漻澑瀏熮珋瑠瑬璢畂畄畱疁癅磂磟綹罶羀翏聊膢蒌蒥蓅蓼蔞藰蟉裗蹓鉚鋶鎦鏐鐂铆镠陸雡霤飀飂飅飗餾駠駵騮鬸鰡鶹鷚龙拢笼聋隆垄弄咙窿陇垅胧珑茏泷栊癃砻儱厐哢嚨壟壠宠寵屸嶐巃巄庞徿总攏昽曨朧梇槞櫳湰滝漋瀧爖瓏眬矓硦礱礲竉竜篢篭籠聾蕯蘢蝕蠪蠬衖襱谾豅贚躘鏧鑨隴霳靇驡鸗龍龐龒龓楼搂漏陋露娄篓偻蝼镂蒌耧髅喽瘘嵝僂嘍塿婁寠屚嶁廔慺摟樓溇漊熡牢甊瘺瘻瞜窶簍耬膢艛蔞螻謱軁遱鏤鞻髏路露录鹿陆炉卢鲁卤芦颅庐碌掳绿虏赂戮潞禄麓六鲈栌渌蓼逯泸轳氇簏橹辂垆胪噜镥辘漉撸璐鸬鹭舻侓僇剹勎勠嗠嚕嚧圥坴塶塷壚娽峍廘廬彔挔捋捛摅摝擄擼攄攎枦椂樐樚櫓櫨氌淕淥滤滷漊澛濾瀂瀘熝爐獹玈琭璷瓐甪瘳盝盧睩矑硉硵磠祿稑穋箓簬簵簶籙籚粶緑纑罏翏肤膔膚膟臚舮艣艪艫菉蓾蔍蕗蘆虂虜螰蠦角觮觻谷賂趢踛蹗輅轆轤鄜酪醁鈩錄録錴鏀鏕鏴鐪鑥鑪陸顱騄騼髗魯魲鯥鱳鱸鴼鵦鵱鷺鸕鹵黸乱卵滦峦孪挛栾銮脔娈鸾乿亂圝圞奱孌孿巒攣曫欒灓灤癴癵羉脟臠臡薍虊覶釠鑾鵉鸞略略掠锊剠圙寽擽率畧稤药藥詻鋝鋢论轮抡伦沦仑纶囵侖倫圇埨婨崘崙惀掄棆淪溣睔碖磮稐綸耣腀菕蜦論踚輪錀陯鯩落罗锣裸骡烙箩螺萝洛骆逻络咯荦漯蠃雒倮硌椤捋脶瘰摞泺珞镙猡乐儸儽剆啰囉峈挼捰攎攞攭曪果格樂橐櫟欏欙濼烁爍犖猓玀癳皪砢硦碌礫笿籮絡纙羅腡臝茖蓏蘿蛒蜾蝸蠡袼覶覼詻跞路躒躶邏鉻鎯鏍鑼铬頱饠駱騾驘鮥鱳鵅鸁绿率铝驴旅屡滤吕律氯缕侣虑履偻膂榈闾捋褛稆侶儢勴卛卢呂哷垏壘娄婁寠寽屢嵂庐廬慮慺曥梠樓櫖櫚櫨氀焒爈瘻盧瞜祣穞穭箻篓簍累絽綠緑縷繂膐膢葎蒌蔞藘褸謱軁郘鋁録鏤鑢镂閭馿驢魯鲁鷜鹿吗妈马嘛麻骂抹码玛蚂摩唛蟆犸嬷杩么亇傌呐嗎嘜媽嫲嬤孖尛榪溤犘獁瑪痲睰碼礣祃禡罵蓦蔴螞蟇貉貊遤鎷閁靡馬駡驀鬕鰢鷌麼麽买卖迈埋麦脉劢霾荬佅勱咪哩嘪売派脈蕒薶衇貍買賣邁霡霢鷶麥唛满慢瞒漫蛮蔓曼馒埋谩幔鳗墁螨镘颟鞔缦熳僈姏嫚屘幕悗慲摱槾樠満滿澫澷獌睌瞞矕絻縵蔄蘰蟃蟎蠻襔謾蹒蹣鄤鏋鏝顢饅鬗鬘鰻忙芒盲莽茫氓硭邙蟒漭厖吂哤壾娏尨庬恾朚朦杗杧汒浝牤牻狵甿痝盳瞢硥笀茻莾蘉蛖蠎釯鋩铓駹鸏鹲龍龒龙毛冒帽猫矛卯貌茂贸铆锚茅耄茆瑁蝥髦懋昴牦瞀峁袤蟊旄泖侔冃冇冐勖務堥夘媢嵍愗戼描暓枆楙毣毷氂渵牟犛獏皃眊秏笷緢罞耗芼萺蓩蛑蝐覒貇貓貿軞鄚鄮酕鉚鉾錨霿髳么嚒嚜嚰孭庅濹癦麼麽没每煤镁美酶妹枚霉玫眉梅寐昧媒糜媚谜沫嵋猸袂湄浼鹛莓魅镅楣凂呅味嚜坆坶堳塺墨媄媺嬍嵄徾抺挴攗攟某栂楳槑櫗毎氼沒沬渼湈溦煝燘珻瑂痗眊眛睂睸矀祙禖篃羙脄脢腜膴苺葿蘪蝞跊躾郿鋂鎂鎇韎鬽鶥黣黴门们闷懑扪钔焖亹們怋悗悶惛懣捫暪椚殙汶満满滿燜玟玣玧璊瞞穈菛虋鍆門閅鞔猛梦蒙锰孟盟檬萌氓礞蜢勐懵甍蠓虻朦艋艨瞢儚冡夢夣嫇尨幪庬懜懞掹擝明曚橗氋溕濛獴瓾甿瞑矇矒罞莔萠蕄蝱蟊蟒鄳鄸鋂錳雺霚霥霧霿靀顭饛髳鯍鯭鱦鸏鹲黽黾鼆米密迷眯蜜谜觅秘弥幂靡糜泌醚蘼縻咪汨麋祢猕弭谧芈脒宓敉嘧糸侎冖冞冪劘哋塓孊宻尒尓尔峚幎幦幺彌戂摩摵擟擵攠榓樒檷櫁沕沵洣淧渳溟滵漞濔濗瀰灖熐爢爾獯獼瓕眫眽瞇瞴祕禰穈簚籋粎罙羃羋苾葞蒾蓂蔝蔤藌蝆袮覓覔覛詸謎謐辟醾醿釄銤鑖镾鸍麊麛鼏面棉免绵眠缅勉冕娩腼湎眄沔黾渑丏俛偭冥勔厸喕婂媔嬵愐檰櫋汅泯湣澠牑瞑矈矊矏糆絻綿緍緜緡緬缗臱芇莬葂蝒蠠靣靦鮸麪麫麵麺黽宀秒苗庙妙描瞄藐渺眇缪缈淼喵杪鹋邈仯吵媌嫹庿廟彯猫玅竗篎紗緢緲纱蜱訬鱙鶓灭蔑咩篾蠛乜吀咪哶孭幭懱搣櫗滅瀎眜薎衊覕谂鑖鱴鴓民抿敏闽皿悯珉愍缗闵玟苠泯黾鳘岷僶冧冺刡勄呡垊姄崏忞怋慜憫捪敃敯旻旼暋汶渂湏湣潣琘琝瑉痻盷盿眠砇碈笢笽簢緍緡繩绳罠賯鈱錉鍲閔閩名明命鸣铭螟盟冥瞑暝茗溟酩佲凕姳嫇慏掵朙榠洺猽眀眳萌蓂覭詺鄍銘鳴谬缪繆謬摸磨抹末膜墨没莫默魔模摩摹漠陌蘑脉沫万无冒寞秣瘼殁镆嫫谟蓦貊貘麽茉馍耱么伯佰劘劰勿嗼嚤嚩圽塻妺嫼尛帓帕帞怽懡戂抚撫擵攠昧昩暯枺橅歾歿沒瀎無爅狢百皌眜眽眿瞐瞙砞礳粖糢絈絔縸纆艒莈藐藦蛨蟆蟔袜袹謨謩譕貃貈貉貌銆鏌靺鞨饃饝驀髍魩魹麼麿黙嘿嬷某谋牟眸蛑鍪侔缪哞件劺厶呣堥婺恈敄桙毋洠瞴繆蟱袤謀鉾鞪鴾麰蝥木母亩幕目墓牧牟模穆暮牡拇募慕睦姆姥钼毪坶沐仫苜凩墲娒婺峔幙慔朷楘樢毣氁炑牳狇獏畆畒畝畞畮砪縸繆缪胟艒茻莯萺蚞踇鉧鉬雮霂鞪呒嘿那拿哪纳钠娜呐南衲捺镎肭乸內内吶呶嗱妠抐拏挐淰秅笚笝箬篛納絮蒘蒳袦訤詉誽豽貀蹃軜郍鈉鎿雫靹魶乃耐奶奈氖哪萘艿柰鼐佴倷妳嬭孻廼掜搱摨渿熋疓耏能腉螚褦迺釢錼难南男赧囡蝻楠喃腩侽囝妠娚婻嫨弇戁抩揇摊攤暔枏枬柟湳滩灘煵畘莮萳諵遖難颌囊馕曩囔攮乪儾哝噥嚢崀憹搑擃欜涳瀼灢蘘蠰譨饢鬞齉闹脑恼挠淖孬铙瑙垴呶蛲猱硇匘堖夒婥嫐峱嶩巎巙怓悩惱憹撓橈檂浇澆獶獿碙碯脳腝腦臑蝚蟯詉譊鐃閙鬧呢哪那呐讷吶抐疔眲訥疒内哪馁那內娞婑氝浽脮腇錗餒餧鮾鯘嫩恁媆嫰枘腝臑能竜而耐螚你泥拟腻逆呢溺倪尼匿妮霓铌昵坭祢猊伲怩鲵睨旎伱儗儞児兒埿堄妳婗嫟嬭嬺孨孴屔屰嶷彌惄愵慝懝抐抳掜擬晲暱柅棿檷氼淣滠濔濘瀰灄狔痆眤禰秜籾縌聻胒腝膩臡苨薿蚭蛪蜺袮觬誽譺貎跜輗迡郳鈮鉨鑈镾隬馜鯢麑齯溺年念捻撵拈碾蔫粘廿黏辇鲇鲶埝卄哖唸姩捵撚攆榐涊淰溓痆秊秥簐艌趁趂跈蹍蹨躎輦輾辗鮎鯰鵇娘酿嬢孃醸釀鸟尿袅茑脲嬲嫋嬝尥尦樢溺茮蔦裊褭鳥捏镍聂孽涅镊啮陧蘖嗫臬蹑颞乜倪喦噛嚙囁囐囓囡圼埝孼峊嵒嵲嶭巕帇幸惗捻掜揑摂摄摰攝敜枿棿槷櫱痆篞籋糱糵聶肀臲苶菍蠥褹諗讘踂踗踙躡鉨鉩銸鋷錜鎳鑈鑷钀闑隉顳齧您恁囜拰脌拧凝宁柠狞泞佞甯咛聍侫儜冰嚀嬣寍寕寗寜寧年擰攘橣檸澝濘獰疑矃聹苧薴鑏鬡鬤鸋牛扭纽钮拗妞狃忸怓抝杻汼沑炄牜紐莥蚴鈕靵弄浓农脓哝侬儂咔噥憹挊挵欁濃癑禯秾穠繷膿莀蕽襛農辳醲齈廾耨啂嬬搙擩槈檽獳羺譨譳鎒鐞怒努奴孥胬驽弩仅伖伮傉呶帑搙擩砮笯褥詉駑暖奻渜湪濡煖煗餪暖暖暖暖怒虐疟谑硸挪诺懦糯娜喏傩锘搦儺吶呐哪堧媠嫷愞懧掉掿搙搻梛榒橠毭渪稬穤糑糥耎袲袳諾蹃逽那郍鍩难難需女衄钕恧朒沑狃籹絮聏肭衂釹婩疟疟瘧瘧虐虐哦喔噢筽怕爬趴啪耙扒帕琶派筢杷葩叭吧妑帊把掱汃潖皅舥芭苩袙跁鈀钯派排拍牌迫徘湃哌俳蒎啡棑椑犤猅箄簰脾腗輫鎃盘盼判攀畔潘叛磐番般胖襻蟠袢泮拚爿蹒乑伴冸半卞坢姍姗媻审宷審幋弁彦扳拌搫柈槃沜洀湴溿瀊瀋炍片牉牓畨皤盤盻眅眫碆磻籓縏繁膰蒰螌褩詊跘踫蹣鄱鋬鎜鑻闆鞶頖鵥旁胖耪庞乓膀磅滂彷逄螃仿傍厐嗙夆嫎尨彭徬房方汸沗炐篣肨胮膖舽蒡蠭覫趽逢鎊镑雱霶髈鰟鳑龎龐跑抛炮泡刨袍咆狍匏庖疱脬包嚗垉奅抱拋摽炰爮犥瓟皰砲礟礮穮窌胞脟苞萢藨蚫袌褜謈軳鉋铇鞄颮飑鮑鲍麃麅麭陪配赔呸胚佩培沛裴旆锫帔醅霈辔伂俖倍啡坏垺妃妚姵婄媐嶏怌抷掊攈斾昢柸棑毰浿淠犻珮琣琲笩肧艴茇茷蓜蜚衃裵賠轡錇阫陫馷駍喷盆湓吩呠喯噴本歕汾濆瓫翉翸葐衯碰捧棚砰蓬朋彭鹏烹硼膨抨澎篷怦堋蟛嘭亨倗傍傰剻匉塜塳庄弸恲憉挷掽搒摓旁梈椖椪槰樥泙淎淜滂漨漰熢痭皏硑磞稝竼篣絣纄胓芃苹荓莑蟚踫軯軿輣輧迸逢逬錋鑝閛韸韼駍騯髼鬅鬔鵬批皮披匹劈辟坯屁脾僻疲痞霹琵毗啤譬砒否貔丕圮媲癖仳擗郫甓枇睥蜱鼙邳吡陂铍庀罴埤纰陴淠噼蚍裨伓伾俾副卑噽嚊嚭坏培壀妚嫓岯崥嶏帔庇庳怶悂憵扑抷拂揊旇朇枈椑榌比毘毞渒潎澼濞炋焷狉狓猈疈疋痦痺睤磇礔礕秛秠稫笓箆篦篺簲粃紕罷羆翍耚肶脴腗膍芘苉苤萆蕃蚌蚽蚾螕螷蠯被諀豼豾鄱釽鈈鈚鈲鈹鉟銔銢錃錍鎞钚闢阰隦鞞頗顖颇駓髬魮魾鮍鲏鴄鵧鷿鸊片篇骗偏便扁翩缏犏骈胼蹁谝囨媥平徧楄楩猵璸緶腁萹蝙褊覑諚諞貵賆跰辩辯駢騈騗騙骿魸鶣阝肀匚艹虍亠忄彐冂灬扌丨礻饣丿辶冖彡钅囗勹衤丬凵氵讠攵犭亻纟廴夂丶宀廾刂疒卩屮冫票飘漂瓢朴螵莩嫖瞟殍缥嘌骠剽僄勡彯徱慓摽旚潎犥皫磦篻縹翲膘蔈薸謤醥闝顠飃飄驃驫骉魒髟瞥撇氕苤丿嫳撆暼潎肺蔽覕鐅品贫聘拼频嫔榀姘牝颦匕嚬娉嬪拚朩汖泵玭琕矉砏礗穦薲蘋貧頻顰平凭瓶评屏乒萍苹坪冯娉鲆枰俜倗凴呯塀娦屛岼帡帲幈慿憑檘泙洴涄淜焩玶甁甹砯砰硑竮箳簈缾聠胓艵荓蓱蘋蚲蛢評軿輧郱鉼頩馮鮃冖秤破坡颇婆泼迫泊魄朴繁粕笸皤钋陂鄱攴叵珀钷哱嘙奤娝尀尃屰岥岶巿廹搫敀昢桲椺櫇洦淿湐溌溥潑濼烞猼皛砶翍膊蒪蔢謈跛酦醱釙鉕鏺霸頗馞駊髆泺剖掊裒吥咅哣垺培堷婄抔抙抱捊棓涪犃箁裦褒襃踣部郶錇锫颒扑铺谱脯仆蒲葡朴菩莆瀑埔圃浦堡普暴镨噗匍溥濮氆蹼璞镤僕剝剥卜圑圤墣巬巭扶抪捗撲擈攴暜柨樸檏潽炇烳獛甫痡瞨砲秿穙箁纀舖舗苻荹菐蒱蜅襆襥諩譜豧贌酺鋪鏷鐠陠駇鯆鵏攵曝起其七气期齐器妻骑汽棋奇欺漆启戚柒岂砌弃泣祁凄企乞契歧祈栖畦脐崎稽迄缉沏讫旗祺颀骐屺岐蹊萁蕲桤憩芪荠萋芑汔亟鳍俟槭嘁蛴綦亓欹琪麒琦蜞圻杞葺碛淇祗耆绮丌亝伎倛偈傶僛切刺剘勤吃吱呇呮咠唘唭啓啔啟喰噐埼夡娸婍宿岓嵜己帺忔忮忯忾恓恝悽愒愭愾慼慽憇懠扢扱扺技抵拞挈捿掑揭摖支攲敧斉斊旂晵暣朞枝栔桼梩棄棊棨棲榿檱櫀欫毄気氣洓济淒済渍渏湆湇滊漬濝濟炁焏猉玂玘璂甈甭畸疧盀盵矵碁碕碶磎磜磧磩礘示祇禥禨稘竒簯簱籏粸紪絜綥綨綮綺緀緕緝纃缼罊肐肵臍舙艩芞萕薺藄蘄蚑蚔蚚蜝螇螧蟣蟿蠐衹袳裿褀褄觭訖諆諬諿豈趞趿跂踑踖踦躤躩軙軝迉逗邔郪鄿釮錡鏚鐖锜闙隑霋頎饑騎騏騹鬐鬾鬿魌魕鮨鯕鰭鲯鵸鶀鶈麡鼜齊齮恰卡掐洽髂袷葜佉價冾咭圶客帢愘抲拤挈揢搳擖楬殎疴矻硈磍絜跒酠鞐鮚鲒前钱千牵浅签欠铅嵌钎迁钳乾谴谦潜歉纤扦遣黔堑仟岍钤褰箝掮搴倩慊悭愆虔芡荨缱佥芊阡肷茜椠犍骞乹仱伣俔偂傔僉儙凄凵刋厱唊嗛圱圲塹墘壍奷婜媊嬱孅孯寨岒嵰廞忏忴悓慳扲拑拪挳掔揃揵摼撁撍撖攐攑攓朁杄杴柑棈榩槏槧橬檶櫏欦欿歁歬汘汧涔淒淺渐湔漸潛濳濽灊灒炶煔熑燂燫牽皘竏筋箞篏篟簽籖籤粁綪縴繾羟羥羬脥腱膁臤艌苂茾荕葥葴蒨蔳蕁藖蚈蚙蜸諐謙譴谸赶軡輤遷釺鈆鈐鉆鉗鉛銭鋟錎錢鍼鎆鏲鐱鑓鑯锓開雃靬韆顅馯騚騝騫鬜鬝鰜鰬鳒鳽鵮鶼鹐鹣黚齦龈强枪墙抢腔呛羌蔷将蜣跄戗襁戕炝镪锖锵羟樯嫱創勥哐唴啌嗆嗴墏墻嬙將嶈庆廧強彊慶戧控搶摤摪斨椌槍檣殻溬漒熗爿牄牆猐獇玱琷瑲矼箐篬繈繦羗羥羫羻艢蔃薔蘠親謒跫蹌蹡錆鎗鏘鏹顩鶬鸧桥瞧敲巧翘锹壳鞘撬悄俏窍雀乔侨峭橇樵荞跷硗憔谯鞒愀缲诮劁偢僑僺削勪喬喿嘺噭塙墝墧墽嫶峤嵪嶠帩幓幧愁招捎搞摮撽敫校槗橋橾殼毃毳潐焦焳燆燋犞癄睄硚硝碻磝磽礄礉窯竅箾繑繰翹茭荍菬蕉蕎藮蟜誚譑譙趫趬跤踃踍蹺蹻躈郻鄗鄡鄥醮釥銚鍫鍬鏒鐈鐰铫陗鞩鞽韒頝顤顦驕骄骹髚髜切且怯窃茄砌郄趄惬锲妾箧慊伽挈倢倿偼匧厒唼喋契婕媫帹悏愜捷朅椄沏洯淁漆疌癿稧穕竊笡篋籡緁聺脞苆蕺藒蛣蛪詧跙踥鍥鐑魥鯜鰈鲽亲琴侵勤擒寝秦芹沁禽钦吣覃矜衾芩溱廑嗪螓噙揿檎锓儭厪吢唚坅埁埐堇墐媇嫀寑寢寴嵚嶔嶜庈廞忴慬懃懄扲抋捦搇撳斳昑梫槿橬櫬欽浸涁渗滲澿濅瀙珡琹瘽矝笉綅耹肣臤菣菦菳蓁蕲藽蘄蚙螼蠄衿親誛赺赾鈂鈊鈙鋟雂靲頜顉顩颌駸骎鬵鮼鳹请轻清青情晴氢倾庆擎顷亲卿氰圊謦檠箐苘蜻黥罄鲭磬綮倩傾儬凊剠勍啨埥声夝媇寈庼廎慶掅擏暒棾樈檾櫦殑殸氫涇淸渹漀濪玪甠硘硜碃精綪胜莔葝請軽輕郬鑋靑靘頃鯖鶄穷琼跫穹邛蛩茕銎筇儝卭嬛宆惸憌桏橩焪焭煢熍琁璚瓊瓗睘瞏窮竆笻舼藑藭蛬赹鞠求球秋丘泅仇邱囚酋龟楸蚯裘糗蝤巯逑俅虬赇鳅犰湫鼽遒丠区厹叴唒团坵媝宿寈崷巰恘惆愀扏捄搝朹梂櫹殏毬氽氿汓浗渞湬湭煪牫玌璆皳盚秌穐篍紌絿緧肍艽莍萩蓲蘒虯蛷蝵蟗蠤觓觩訄訅賕趜趥逎邺醔釓釚釻銶钆鞦鞧馗鮂鯄鰌鰍鰽鱃鳩鵭鶖鸠鹙龜龝去取区娶渠曲趋趣屈驱蛆躯龋戌蠼蘧祛蕖磲劬诎鸲阒麴癯衢黢璩氍觑蛐朐瞿岖苣伹佉佢刞匤匷區厺句呿坥岨岴嶇巨弆忂怚憈戵抾敺斪欋欪毆浀淭灈焌璖竘竬筁籧粬紶組絇组翑翵耝胊胠脥臞菃葋蚼蜡蝺螶蟝蠷衐袪覰覷覻詓詘誇誳趍趜趨跔跙跼躣軀軥迲遽郥鉤鐻鑺閴闃阹鞠鞫駆駈騶驅驺髷魼鮈鰸鱋鴝鶌鸜麮麯麹鼁鼩齲匚全权劝圈拳犬泉券颧痊醛铨筌绻诠辁畎鬈悛蜷荃佺勧勸卷啳圏圳埢姾婘孉峑巏巻弮恮惓拴捲搼栒桊棬椦楾槫権權汱洤湶灥烇牶牷犈獾琯瑔甽矔硂純絟綣縓纯腃葲虇蠸觠詮謜譔跧踡輇酄銓鐉闎韏顴駩騡鰁鳈鸛鹳齤犭却缺确雀瘸鹊炔榷阙阕悫傕决卻埆塙墧屈崅愨慤搉攉敠殻毃汋決燩猎獡皵硞碏確碻礐礭舃舄芍蒛蚗趞踖躤闋闕隺鳥鵲群裙麇逡囷夋宭峮帬歏箘羣裠踆輑遁麏麕染燃然冉髯苒蚺冄卪呥嘫姌媣柟橪熯珃繎肰舑蒅蚦衻袇袡蹨髥然燃让嚷瓤攘壤穰禳儴勷壌孃忀懹欀瀼爙獽穣纕蘘蠰譲讓躟鑲镶鬤饶饶绕扰荛桡娆嬈挠撓擾橈犪穘繚繞缭蕘蟯襓遶隢饒热若惹喏偌捼渃熱蹃人任忍认刃仁韧妊纫壬饪轫仞荏葚衽稔仭儿刄姙屻忈忎恁扨朲杒栠栣梕棯涊牣秂秹紉紝絍綛纴肕腍芢荵菍袵訒認讱躵軔釰鈓銋靭靱韌飪餁魜鵀亻仍扔戎礽穰耳艿芿辸陾日囸氜釰鈤馹驲容绒融溶熔荣戎蓉冗茸榕狨嵘肜蝾傇傛坈媶嫆嬫宂峵嵤嶸巆搈搑摉曧栄榮榵毧氄瀜烿爃瑢穁穃絨縙縟缛羢茙螎蠑褣軵鎔镕隔頌颂駥髶肉揉柔糅蹂鞣厹媃宍楺渘煣瑈瓇禸粈腬莥葇蝚輮鍒鑐韖騥髳鰇鶔如入汝儒茹乳褥辱蠕孺蓐襦铷嚅缛濡薷颥溽洳侞偄吺咮嗕女媷嬬嶿帤扖挐擩曘月杁桇檽渪燸獳筎縟繻肉肗臑蒘蕠袽込邚鄏醹銣鑐需顬鱬鳰鴑鴽软阮朊偄堧壖媆嫰愞撋檽渪濡燸瑌瓀碝礝緛耎腝蝡軟輭需瑞蕊锐睿芮蚋枘蕤兊兌兑內内叡壡婑惢抐撋桵棁橤汭甤笍綏緌繠绥苼蕋蘂蘃蜹踒鈉銳鋭鏸钠润闰撋橍潤閏閠若弱箬偌叒婼嵶惹挼捼撋楉渃溺焫爇篛芮蒻鄀鰙鰯鶸撒洒萨挲仨卅飒脎摋攃桬檫櫒殺泧潵灑蔡蕯薩訯鈒鎝鏾钑霅靸鞈颯馺塞腮鳃思赛噻僿嗮嘥愢揌毢毸簑簺賽顋鰓乷虄三叁伞散桑嗓丧搔骚扫嫂瑟色涩森僧莎砂杀刹沙纱傻啥煞筛晒珊苫杉山删煽衫闪陕擅赡膳善汕扇缮馓糁毵霰俕傘傪厁参參叄叅壭帴弎橵毶毿潵犙糂糝糣糤繖蔘謲鏒鏾閐饊鬖彡氵扫嫂搔骚梢埽鳋臊缫瘙哨慅懆掃掻橾氉溞煰燥矂縿繅繰缲鄵鐰颾騒騷髞鯵鰠鰺鱢鲹色涩瑟塞啬铯穑嗇寨廧愬懎拺擌栜槭歮歰泣洓渋渍溹漬澀澁濇濏瀒琗璱瘷穡穯粣繬蔷薔虩譅轖鉍銫鎍鎩鏼铋铩闟雭飋裇森掺摻槮渗滲篸襂僧鬙鬙閪閪縇縇杀沙啥纱傻砂刹莎厦煞杉嗄唼鲨霎铩痧裟挲歃乷倽儍剎唦啑喢噎帹廈挱接摂摄摋攝榝樧殺濈猀硰箑粆紗繌繺翜翣菨萐蔱賒賖赊鎩閯閷霅魦鯊鯋晒筛色酾摋攦曬殺篩簁簛籭繺術諰閷山闪衫善扇杉删煽单珊掺赡栅苫掸膳陕汕擅缮嬗蟮芟禅跚鄯潸鳝姗剡骟疝膻讪钐舢埏傓僐僤儃儋刪剼単單嘇圸墠墡壇姍嶦幓挻掞搀搧摻擔攙敾晱曏曑杣柵椫樿檀檆櫼潬澘澹灗炶烻煔熌狦猭痁睒磰禪穇笘笧縿繕纔羴羶脠葠蔪蟬蟺襂襳覢訕謆譱贍赸軕邓邖釤銏鐥閃閄閊陝顃顫颤饍騸鯅鱓鱔鱣鳣彡凵髟上伤尚商赏晌墒汤裳熵觞绱殇垧丄仩傷场埫場塲尙恦愓慯扄殤湯滳漡禓緔蔏螪蠰觴謪賞踼鑜鞝鬺少烧捎哨勺梢稍邵韶绍芍召鞘苕劭潲艄蛸筲佋削卲娋弰招搜旓柖溲焼燒燿玿睄笤紹綃綤绡莦萔萷蕱袑輎鞩韒颵髾鮹杓社射蛇设舌摄舍折涉赊赦慑奢歙厍畲猞麝滠佘厙奓弽慴懾抴拾挕捨揲摂摵攝檨欇涻渉灄畬睫碟磼聂聶舎葉蔎虵蛞蛥蠂設賒賖輋闍阇鞨韘騇谁身伸深婶神甚渗肾审申沈绅呻参砷什娠慎葚糁莘诜谂矧椹渖蜃哂胂伔侁侺信兟參叄叅吲嘇堔妽姺嫀嬸孞宷審屾峷幓弞愼扟抌抻搷昚曋柛棯椮榊槮氠涁淰滲瀋燊珅甡甧瘆瘮眒眘瞋瞫矤祳穼籶籸紳綝罙罧脤腎葠蓡蔘薓蜄裑覾訠訷詵諗讅谉邥鉮鋠震頣駪魫鯅鯓鯵鰰鰺鲹鵢黮声省剩生升绳胜盛圣甥牲乘晟渑眚笙嵊丞乗偗冼剰勝呏垩墭姓娍媵憴斘昇晠曻枡榺橳殅殸泩渻湦澠焺狌珄琞甸竔箵縄繩聖聲苼蕂譝貹賸鉎鍟阩陞陹鱦鵿鼪是使十时事室市石师试史式识虱矢拾屎驶始似嘘示士世柿匙拭誓逝势什殖峙嗜噬失适仕侍释饰氏狮食恃蚀视实施湿诗尸豕莳埘铈舐鲥鲺贳轼蓍筮炻谥弑酾螫丗乨亊佀佦兘冟勢卋厔叓呞呩咶唑啇噓埶堤塒奭姼媞嬕実宩宲寔實寺屍峕崼嵵師弒彖徥忕忯恀惿戺提揓斯旹昰時枾柹栻楴榁榯檡汁沶洂浉液湜湤溡溮溼澤澨濕烒煶狧狶獅瑡畤痑眂眎眡睗礻祏禵秲竍笶笹筛箷篒篩簭籂籭絁繹绎耆肢胑舍舓葹蒒蒔蝕蝨褆褷襫襹視觢訑試詩諟諡謚識貰赫跩軾辻遈遞適遰遾邿郝醳釃釈釋釶鈰鉂鉃鉇鉈鉐鉽銴鍉鍦鎩铊铩飠飭飾餙餝饣饬馶駛魳鮖鯴鰘鰣鰤鳲鳾鶳鸤鼫鼭齛齥手受收首守瘦授兽售熟寿艏狩绶収嘼垨壽扌掱敊涛涭濤獣痩綬膄鏉书树数熟输梳叔属束术述蜀黍鼠淑赎孰蔬疏戍竖墅庶薯漱恕枢暑殊抒曙署舒姝摅秫纾沭毹腧塾菽殳澍倏侸俆俞俶倐儵兪咰售嗽娶婌孎尌尗屬庻忬怷悆捈捒掓揄攄數暏書朮朱杸杼柕樞樹橾毺氀涑潄潏潻濖瀭焂瑹璹疋疎癙稌竪籔糬紓紵絉綀翛荗荼蒁蒣薥薮藪藷虪蠴蠾術裋襡襩謶豎豫贖跾踈軗輸透鄃野鉥錰鏣鐲镯陎除隃鮛鱪鱰鵨鶐鷸鸀鹬鼡忄丨刷耍唰唆涮誜选選摔甩率帅衰蟀帥綏绥缞衰摔摔甩摔摔衰甩衰率衰摔帅衰甩衰衰率耍栓拴闩涮專栒槫汕腨踹閂双霜爽泷孀傱塽孇慡樉欆淙滝漺瀧灀礵縔艭鏯雙騻驦骦鷞鸘鹴水谁睡税说娷帨挩捝氺涗涚祱稅脽裞說説誰閖氵顺吮瞬舜俊巛巡廵恂楯橓眴瞚瞤蕣輴順鬊说数硕烁朔搠妁槊蒴铄哾嗍嗽欶汋洬溯濯燿爍獡療矟碩箾药萷藥說説四死丝撕似私嘶思寺司斯食伺厕肆饲嗣巳耜驷兕蛳厮汜锶泗笥咝鸶姒厶缌祀澌俟亖以佀佁価俬偲傂儩凘厠台噝娰媤孠廝徙恖愢杫析枱柶梩楒榹泀泤洍涘瀃燍牭磃祠禗禠禩竢簛糸糹絲緦罒罳肂肄菥蕬蕼虒蜤螄螔蟖蟴覗謕貄逘釲鈶鈻鉰銉銯鋖鍶鐁雉颸飔飤飴飼饴駟騃騦鷉鷥麗鼶灬纟送松耸宋颂诵怂讼竦菘淞悚嵩凇崧忪倯傱吅娀嵷庺愯慫憁憽捒捴揔摗枀枩柗梥棇楤檧漎濍硹聳蓯蘴蜙訟誦鍶鎹锶頌餸駷鬆艘搜擞嗽嗾嗖飕叟薮锼馊瞍溲螋傁凁叜廀廋捒捜摗撨擻敕族棷櫢欶涑潚獀瘶籔蒐蓃藪謏鄋醙鎪鏉颼颾餿騪素速诉塑宿俗苏肃粟酥缩溯僳愫簌觫稣夙嗉谡蔌涑傃僁卹嗖囌圱圲埣塐嫊愬憟捽搬摵梀棴榡樎樕橚櫯殐泝洬溸潚潥玊珟璛甦碿稡稤穌窣粛縤縮肅膆莤藗蘇蘓訴謖趚蹜遡遬鋉餗驌骕鯂鱐鷫鹔酸算蒜狻匴撰痠祘笇筭篹选選岁随碎虽穗遂尿隋髓绥隧祟眭谇濉邃燧荽睢亗倠哸嗺埣夊娞嬘嵗挼旞檖歲歳毸浽滖澻瀡煫熣璲瓍睟砕禭穂穟簑粋粹綏縗繀繐繸缞脺膸芕荾莎葰蓑襚誶譢賥遀遗遺鏸鐆鐩陏隊隨雖靃鞖韢髄孙损笋榫荪飧狲隼喰孫巺扻損搎摌树槂潠猻畃筍蓀蕵薞跣鎨飱餐鶽所缩锁琐索梭蓑莎唆挲睃嗍唢桫嗦娑羧些傞嗩嫅岁嵗惢抄挱摍暛歲沙溑溹牺犧獻琑瑣璅簑簔縒縮莏葰蜶衰褨趖逡逤鎈鎍鎖鎻鏁霍靃髿魦鮻他她它踏塔塌拓獭挞蹋溻趿鳎沓榻漯遢铊闼嗒侤傝呾咜嚃嚺墖太崉搨搭撘撻榙毾涾湿溚澾濌濕牠狧獺祂禢荅褟誻譶蹹躢达迏迖逹達遝鉈錔鎉鎑闒闟闥阘鞈鞑鞜鞳韃鮙鰨太抬台态胎苔泰酞汰炱肽跆呔鲐钛薹邰骀儓冭咍囼坮大夳奤嬯孡忕忲態擡斄旲枱檯溙漦炲燤珆箈籉粏能臺舦菭詒诒軚釐鈦鈶颱駘鮐谈叹探滩弹碳摊潭贪坛痰毯坦炭瘫谭坍檀袒钽郯镡锬覃澹昙忐但倓傝僋儃啴嗿嘆嘽嘾埮墰墵壇壜婒弾彈怹惔憛憳憻掸撢撣擹攤暺曇榃橝歎沈淡湛湠漢潬灘炎璮痑癉癱禪緂繵罈罎胆舑舔舕荨菼蕁蕈藫裧襢談譚譠貚貪賧赕醈醓醰鉭錟顃餤鷤黮躺趟堂糖汤塘烫倘淌唐搪棠膛螳樘羰醣瑭镗傥饧溏耥帑铴螗伖偒傏儻劏啺嘡坣嵣弹愓戃扩摥擴攩曭榶橖欓湯漟漡煻燙爣矘磄禟篖簜糃糛膅荡蓎蕩薚蘯蝪赯踼蹚逿鄌鎕鎲鏜鐋鐺钂铛镋閶闛闣阊隚鞺餳餹饄鶶黨鼞套掏逃桃讨淘涛滔陶绦萄鼗洮焘啕饕韬叨仐匋咷夲夵姚嫍幍弢慆抭挑搯梼槄檮涭濤燾瑫祹筹籌絛綢綯縚縧绸绹蜪裪討詜謟跳轁迯醄鋾錭鞀鞉鞱韜頫飸饀駣騊畓特慝铽忑忒匿式犆職脦蚮螣蟘貣貸贷鋱疼腾藤誊滕僜儯幐漛痋籐籘縢膯虅螣謄邆霯駦騰驣鰧鼟提替体题踢蹄剃剔梯锑啼涕嚏惕屉醍鹈绨缇倜裼逖荑悌俶偍厗啑嗁嚔奃姼媂媞屜崹嵜弚弟徥徲悐惖惿戻折挮掦揥擿是桋棣楴歒殢洟渧漽狄珶瑅瓋睇碮磃禵稊穉籊綈緹罤肆苐蕛薙虒蝭蟬衹褅褆詆諦謕诋谛趧趯跃踶蹏躍躰軆达迏迖逷遆適銻錫鍗鐟锡題騠骵體髢髰鬀鬄鮧鮷鯷鳀鴺鵜鶗鶙鷈鷉鷤扌天田添填甜舔恬腆佃掭钿阗忝殄畋倎兲典吞呑唺嗔塡娗婖寘屇悿捵搷晪栝沺沾淟湉滇琠瑱璳甛甸町畇畑畠痶盷睓睼瞋碵磌窴紾緂胋舑舚苫菾蚕蚺覥觍賟酟鈿銛錪鍩鎭鎮铦锘镇闐靔靝靦顚顛颠餂鴫鷆鷏黇条跳挑调迢眺龆笤祧蜩髫佻窕鲦苕粜儵咷啁姚嬥宨岧岹庣恌斢旫晀朓朷桃條樤祒稠窱糶絩聎脁脩艞芀萔蓚蓧蓨螩覜誂調超趒趠踔銚鋚鎥铫鞗頫齠铁贴帖萜餮僣占呫怗惵聑蛈蝶貼跕鉄鉆銕鋨鐡鐵锇飻驖鴩听停挺厅亭艇庭廷烃汀町莛铤葶婷蜓梃霆侱侹厛圢奠奵娗嵉庁庍廰廳忊桯楟榳涏渟濎烴烶珵珽筳綎耓聤聴聼聽脡艼蝏誔諪邒鋌閮鞓頲颋鼮同通痛铜桶筒捅统童彤桐瞳恫侗酮潼茼仝砼峒恸佟嗵垌偅僮劏勭哃囲峂峝庝恿慟憅晍曈朣樋橦氃洞浵湩炵烔熥燑爞犝狪獞痌眮硐硧秱穜筩粡絧統綂膧艟蓪蚒蜼蟲衕詷赨重鉖鉵銅餇鮦鲖冂头偷透投钭骰亠偸埱妵婾媮愉敨殕紏綉緰绣諭諳谕谙逗鋀鍮頭飳黈土图兔涂吐秃突徒凸途屠酴荼钍菟堍余兎凃唋啚図圖圗圡堗塗墿宊峹嵞嶀庩廜怢悇捈捸揬摕斁杜梌檡汢涋湥潳瑹痜瘏禿稌筡腞腯莵葖蒤趃跌跿迌釷鈯鋀鋵鍎馟駼鵌鵚鵵鶟鷋鷵鼵团湍疃抟彖剬剸団圕團塼墥嫥專慱摶敦槫檲湪漙煓猯畽磚稅税篿糰蓴褍褖貒鏄鱄鶉鷒鷻鹑腿推退褪颓蜕煺忒侻俀僓啍墤娧尵弚弟怢橔稅税穨聉脫脮脱蓷藬蘈蛻謉讉蹆蹪追隤頹頺頽饋馈駾騩骽魋吞屯褪臀囤氽饨豚暾吨吴呑啍噋坉庉忳憞旽朜汭沌涒炖焞燉畽窀純纯肫膯臋芚蜳豘軘逐錪霕飩魨鲀黗拖脱托妥驮拓驼椭唾鸵陀魄橐柝跎乇坨佗庹酡柁鼍沱箨砣他仛侂侻咃啴嘽堶媠嫷它岮彵惰扡拕挩捝撱杔杝棁楕槖橢毤毻汑池沰涶牠狏砤碢磚稅税籜紽脫舃舄莌萚蘀蛇蟺袉袘袥訑託詑說説讬说跅踻軃迆迤迱鉈鋖铊阤陁隋飥饦馱馲駄駝駞騨驒驝魠鮀鰖鱓鴕鵎鼉鼧舵挖瓦蛙哇娃洼凹袜佤娲腽劸咓唲啘嗗嗢姽媧屲帓徍搲攨汙汚污溛漥瓲畖砙穵窊窐窪聉膃襪譁邷靺鞋韈韎韤鮭鲑黳鼃外歪崴呙咼喎夭瀤竵顡完万晚碗玩弯挽湾丸腕宛婉烷顽豌惋娩皖蔓莞脘蜿绾芄琬纨剜畹菀乛倇免关刓卍卐唍园埦塆壪夗夘妧婠孯岏帵彎忨惌抏捖捥掔晩晼朊杤梚椀槾汍涴潫澫灣琓盌睕笂箢紈絻綄綩綰翫脕苋莧莬萖萬薍蚖貦貫贃贎贯踠輐輓邜鄤鋄鋔鋺錽鍐鎫関闗關頑骩骪骫魭望忘王往网亡枉旺汪妄芒辋魍惘罔亾仼兦匡尢尣尩尪尫彺徃徍忹抂暀朚朢棢瀇焹琞皇盳網莣菵蚟蛧蝄誷輞迋迬为位未围喂胃微味尾伪威伟卫危违委魏唯维畏惟韦巍蔚谓尉潍纬慰桅萎苇渭遗葳帏艉鲔娓逶闱隈沩玮涠帷崴隗诿洧偎猥猬嵬軎韪炜煨圩薇痿亹倭偉偽僞儰厃叞哙唩喡喴噲囗圍堤墛壝媁媙媦寪岿峗峞崣嵔嶶巋幃廆徫恑愄愇懀捤捼揋揻撝撱斖暐有机梶椲椳楲欈沇洈浘渨湋溈溦潙潿濊濰濻瀢為烓煀煒煟熨熭燰爲犚犩猗猚琟瑋璏瓗痏癐癓眭瞶硊硙碨磈磑立維緭緯縅罻腲芛芟苿茟荱荽菋萏葦葨蒍蓶蔿薳藯蘶蜲蜹蜼蝛蝟螱衛衞褽覣覹觹觽觿詴諉謂讆讏趡踒踓躗躛轊違遺鄬醀錗鍏鍡鏏闈阢隇隹霨霺韋韑韙韡頠颹餧餵饖骩骪骫鮇鮠鮪鰃鰄鰖鳂鳚问文闻稳温吻蚊纹瘟紊汶阌刎雯璺免呅呚呡問塭妏娩彣忞忟愠慍抆揾搵昧昷桽榅榲歾殁殟渂溫炆煴珳瑥瘒眼砇穏穩笏紋絻緼縕缊聞肳脕脗芠莬蕰蕴薀藴蘊蚉螡蟁褞豱輼轀辒鈫鎾閺閿闅闦限韞韫顐饂馼魰鰛鰮鳁鳼鴍鴖鼤翁嗡瓮蕹蓊勜塕壅奣嵡暡滃甕瞈罋聬蒙螉鎓鶲鹟齆膸我握窝卧挝沃蜗涡斡倭幄龌肟莴喔渥硪仴偓唩嗌噁嚄埚堝夭婐婑媉媪媼捰捼捾撾擭杌枂楃涴涹渦濄濣焥猧瓁瘟瞃矆窩腛臒臥艧萵蒦薶蝸踒踠雘馧齷无五屋物舞雾误捂污悟勿钨武戊务呜伍吴午吾侮乌毋恶诬芜巫晤梧坞妩蜈牾寤兀怃阢邬忤骛於鋈仵杌鹜婺迕痦芴焐庑鹉鼯浯圬乄亡亾仡伆侉俉倵儛兦剭務吳呉啎喔嗚噁垭埡堥塢墲奦娒娪娬嫵屼岉峿嵍嵨幠廡弙御忢悞悮惡憮扜扝扤揾摀敄旄旿杅杇柮橆歍母汙汚沕洖洿渞渥溩潕烏無熃熓玝珷珸瑦璑甒瞀瞴矹碔祦禑窏窹笏箼粅膴茣莁莫蕪蘁螐蟱誈誣誤譕趶躌逜郚鄔釫鋘鋙錻鎢铻陚隖雺霚霧霿靰騖鯃鰞鴮鵐鵡鶩鷡鹀鼿齀齬龉唔蝥西洗细吸戏系喜席稀溪熄锡膝息袭惜习嘻夕悉矽熙希檄牺晰昔媳硒铣烯腊析隙栖汐犀蜥奚浠葸饩屣玺嬉禊兮翕穸禧僖淅蓰舾蹊醯欷皙蟋羲茜徙隰唏曦螅歙樨阋粞熹觋菥鼷裼舄义係俙傒凞匸卌卥卻厀吚呬呰咥咦咭唽噏嚊嚱塈壐奊娭媐嬆宩屃屎屖屭嵠嶍嶲巂巇廗徆徯忔忚忥怬怸恄悕惁愾慀憘憙戯戱戲扱扸摡撕擊既晞晳暿杫枲桸棲椞椺榽槢橀橲欪欯歖氣氥洒渓湿滊漇漝潝潟澙濕灑焁焈焟焬煕熂熈熺熻燍燨爔犔犠犧狶猎獡獻琋璽瓕瘜盻睎瞦矖碏磶礂稧窸糦細綌緆縘縰繥繫纚绤羛義習翖肸肹胁脅脇脋舃莃莔葈蒠蒵蓆蔇蕮薂虩蜤蜴蝷螇蟢蠵衋褶襲覀覡覤觹觽觿訢詑誒諰謑謚謵譆诶谥谿豀豨豯貕赥赩趇趘蹝躧遟郄郋郤鄎酅釐釳釸鈒鈢鉨鉩銑錫錯鎴鏭鑴钑错闟隟隵雟雭霫霼飁餏餙餼饻騱騽驨鬩鯑鰓鰼鱚鳃鳛鵗鸂黖鼰鼳郗下吓夏峡虾瞎霞狭匣侠辖厦暇唬狎柙呷黠硖罅遐瑕丅俠假傄叚呀哧嗄嗑嚇圷埉夓夾岈峽廈徦懗押捾搳敮昰梺欱歃毳浃浹溊炠烚煆狹珨疜疨瘕睱硤碬磍祫笚筪給縀縖给翈舝舺芐葭蕸蝦螛諕謑谺赮轄郃鍜鎋鏬閕閜陜陿颬騢魻鰕鶷先线县现显掀闲献嫌陷险鲜弦衔馅限咸锨仙腺贤纤宪舷涎羡铣见苋藓岘痫莶籼娴蚬猃祆冼燹跣跹酰暹氙鹇筅霰仚伣伭佡俔僊僩僲僴咁咞哯唌啣嗛嘕垷埳堿壏奾妗妶姍姗姭姺娊娨娹婱嫺嫻嬐孅寰尟尠屳峴崄嶮幰廯忺慊慳憪憲憸懢挦捍探揱搚搟撊撏攇攕晛杴枮梘槏橌櫶欦毨洒洗涀湺溓澖濂瀗灑灦烍狝獫獮獻玁玹珗現甉癇癎盷省県睍瞯矣硍碱礆礥禒禰秈稴笕筧箲粯糮絃絤綅綖綫線縣縿繊纎纖缐羨羬肩胁胘脅脇脋膁臔臤臽苮莧蔹薟藖蘚蘝蘞蚿蛝蜆衘褼襳見誢誸諴譀譣豏賢贒赻蹮躚軐軒輱轩醎醶釤銑銛銜鋧錎錟鍁鍌鏾鑦钐铦锬閑閒闞阚陥険險韅韯韱顈顕顯餡饀馦鮮鰔鱻鶱鷳鷴鷼鹹麙麲黹鼸彡想向象项响香乡相像箱巷享镶厢降翔祥橡详湘襄飨鲞骧蟓庠芗饷缃葙亨亯佭傢儴勨勷啌啍嚮姠嶑廂忀攘晑曏栙楿欀洋潒珦瓖瓨絴緗纕缿羏膷舡萫薌蘘蚃蠁衖襐詳跭迒郷鄉鄊鄕銄銗鋞鐌鑲閧闀闂響項餉饗饟驤鮝鯗鱌鱜鱶鴹小笑消削销萧效宵晓肖孝硝淆啸霄哮嚣校魈蛸骁枵哓崤筱潇逍枭绡箫佼侾俏俲傚効叜叟号呺呼咲咻哨唠唬啋嗃嘋嘐嘨嘮嘯嘵嚻囂姣婋宯庨彇恔恷憢挠捎揱搜撓撨敩斅斆暁曉梟梢橚櫹歊歒歗殽毊洨涍滧漻潚澩瀟灱灲烋焇熇熽燆燺爻狡猇獟獢痚痟皛皢睄硣穘窙笹筿箾篠簘簫絞綃縿绞翛胶脩膮芍茭莦萷蕭薂藃虈虓蟂蟏蟰蠨訤詨誟誵謏謞謼譊踃較轇较郩銷騷驍驕骄骚骹髇鴞鴵鵁鷍鸮写些鞋歇斜血谢卸挟屑蟹泻懈泄楔邪协械谐蝎携胁解契叶绁颉缬獬榭廨撷偕瀣渫亵榍邂薤躞燮勰伳偞偰僁儶冩劦協卨吤唏喈嗋噧垥塮夑夾奊娎媟孈寫屓屜屟屧屭峫嶰徢恊愶慀拹挾接揳搚摺擕擷攜旪暬枻桔榝槷欸歙殺汁洩湝溉滊潰澥瀉灺炧炨烲焎熁燲爕猲瑎眭碿祄禼糏紲絏絜絬綊緤緳繲纈缷翓耶脅脇脋膎薢藛蝑蝢蠍蠏衺裌褉褻襭觟觧諜諧謝譮讗谍豫跬躠迦鍱鐷隰鞢鞵韰頁頡页骱鬹魼鮭鲑齂齘齛齥龤溃新心欣信芯薪锌辛寻衅忻歆囟莘镡馨鑫昕伈伩俽兴噷噺妡姰嬜孞尋庍廞惞愖憖撢杺枔橝欵款歀潃炘焮盺礥脪興舋襑訢訫軐邤釁鈊鋅鐔阠顖馫馸鬵忄性行型形星醒姓腥刑杏兴幸邢猩惺省硎悻荥陉擤荇侀倖哘坓坙垶塂娙婞嫈嬹巠曐洐涬滎煋熒狌瑆皨睲研硏箵篂緈胜臖興莕蛵裄觪觲謃郉鈃鉶銒鋞钘铏陘餳饧騂骍鮏鯹胸雄凶兄熊汹匈芎兇哅夐宪忷恟敻昫洶焸胷訩詗詾讻诇賯赨修锈绣休羞宿嗅袖秀朽臭溴貅馐髹鸺咻庥岫俢嚊樇櫹滫烋烌煦珛琇璓糔綇綉繍繡脙脩臰臹苬茠莠蓨螑裦褎褏銝銹鎀鏅鏥鏽飍饈髤鮴鱃鵂齅许须需虚嘘蓄续序叙畜絮婿戌徐旭绪吁酗恤墟糈勖栩浒蓿顼圩洫胥醑诩溆煦盱砉于亐伃休伵余侐俆偦冔勗卹呕呴呼咻喣嗅嘔嘼噓垿壻妶姁姐媭嬃幁怴怵恓惐慉掝揟敍敘旮旴昫晇暊朂朐楈槒欨欰欻歔歘殈汿沀淢湑滀滸漵潊烅烼獝珝珬疞盢盨眗瞁瞲矞稰稸窢籲続緒緖緰縃繻續聟肷胊芋芌芧蒣蓲蕦藇藚虗虛蚼蛡蝑規规訏許訹詡諝諿謣謳譃讴谞賉邪鄦鉥銊鑐雩須頊馘驉鬚魆魖魣鱮选悬旋玄宣喧轩绚眩癣券暄楦儇渲漩泫铉璇煊碹镟炫揎萱痃谖亘吅咺喛塇夐妶姰媗嫙嬛弲怰愃愋懁懸揈撰擐昍昡晅暅暖暶梋楥檈洵涓澴烜煖狟獧玆玹琁琄瑄璿瓊癬盤眴睻矎禤箮絃絢絹縣縼繏绢翧翾萲蓒蔙蕿藼蘐蜁蜎蝖蠉衒袨諠諼譞讂贙軒轋選還鉉鋗鍹鏇鐶镮鞙颴饌馔駨駽鰚学雪血靴穴削薛踅噱鳕泶乴决勪吷哮嚯坹壆學岤峃嶨怴斈桖梋樰決泧泬滈澩瀥炔烕燢狘疦疶瞲膤艝茓蒆袕觷謔谑趐轌辥雤鞾韡鱈鷽鸴寻讯熏训循殉旬巡迅驯汛逊勋荤询浚巽鲟浔埙恂獯醺洵郇峋蕈薰荀窨曛徇伨侚偱勛勲勳卂咰噀噚嚑坃塤壎壦奞姰孙孫尋廵悛愻揗撏攳杊栒桪梭樳殾毥洒潭潯濬灥焄煇燂燅燖燻爋爓狥狻珣璕眴矄稄筍筼篔紃絢纁绚臐荨葷蔒蕁薫蘍蟫蟳襑訊訓訙詢賐迿逡遁遜鄩鑂鑫顨馴駨鱏鱘鶽彐呀压牙押芽鸭轧哑亚涯丫雅衙鸦讶蚜垭疋砑琊桠睚娅痖岈氩伢迓揠乛亜亞俹倻劜厊厌厓厭吖吾呾唖啞圔圠圧埡堊堐壓姶婭孲崕庌庘御拁挜掗札枒椏椻歇氬浥漄潝烏犽猚猰玡瑘疨瘂碣磍稏穵窫笌聐蕥襾訝軋輅輵辂邪釾錏鐚铔閘闸顔颜鴉鴨鵪鵶鶕鹌鼼齖齾崖眼烟沿盐言演严咽淹炎掩厌宴岩研延堰验艳殷阉砚雁唁彦焰蜒衍谚燕颜阎铅焉奄芫厣阏菸魇琰滟焱赝筵腌兖剡餍恹罨檐湮偃谳胭晏闫俨郾酽鄢妍鼹崦阽嫣乵但俺偐偣傿儼兗円剦匽厂厃厭厳厴唌喦喭噞嚥嚴囐埏埯塩墕壛壧夏夵妟姲姸娫娮媕嬊嬐嬮嬿孍屵崄嵃嵒嵓嶖嶮巌巖巗巘巚巡广庵廵弇彥愝懕戭扊抁挩挻捝掞揅揜揞敥昖晻暥曕曮棪椻椼楌樮橪檿櫩欕殗氤沇洇洝涎淊淡淫渰渷湺溎漹灎灔灧灩炏烻焔煙熖燄爓牪狠狿猒珚琂瓛甗硏硯硽碞礹篶簷綖縯羡羨膁臙艶艷莚莶菴萒葊葕蔅蔫薟虤蝘裺褗覃覎觃觾訁訮詽諺讌讞讠豓豔豜豣贋贗趼躽軅这這遃郔酀酓醃醶醼釅鉛錟锬閆閹閻閼阭险陰隁隒險靥靨顏顑顔顩饜騐験騴驗驠鬳魘鰋鳫鳱鴈鴳鶠鷃鷰鹽麙麣麲黡黤黫黬黭黰黶鼴齗齞齴龂龑样养羊洋仰扬秧氧痒杨漾阳殃央鸯佯疡炀恙徉鞅泱蛘烊怏佒傟劷勜卬咉坱垟奍姎婸將岟崵崸慃懩抰揚攁敭旸昂昜映暘柍楊楧様樣歍氜氱湯潒瀁炴煬珜瑒瘍癢眏眻礢禓紻羏羕羘羪胦英詇詳諹详軮輰鉠鍈鍚鐊钖阦陽雵霙霷颺飏飬養駚鰑鴦鴹鸉要摇药咬腰窑舀邀妖谣遥姚瑶耀尧钥侥陶约疟珧夭鳐鹞轺爻吆铫幺崾肴曜徭杳窈么乐仸倄偠傜僥匋啮喓嗂噛嚙垚堯娆婹媱嬈宎尭岆峣嶢嶤幼徺怮恌愮抭揺搖摿撽暚曣枖柼楆榚榣樂殀殽洮淫溔滛瀹烄烑熎燿狕猶猺獟玅瑤由眑矅磘祅穾窅窔窯窰筄箹約繇纅艞苭荛葯葽蓔蕘薬藥蘨袎覞訞詏謠謡讑趯踰軺遙銚鎐鑰闄隃靿顤颻飖餆餚騕驁骜鰩鴁鴢鷂鷕鼼齩也夜业野叶爷页液掖腋冶噎耶咽曳椰邪谒邺晔烨揶铘靥亪亱倻偞僷吔啘喝嘢嚈埜堨墅墷壄射峫嶪嶫懕抴拽捓捙揞揲擖擛擨擪擫斜暍曄曅曗枒枼枽楪業歋殕殗洂洇涂漜潱澲煠熀燁爗爺瓛痷皣瞱瞸礏窫緤聂聶荼葉虵蠮蠱謁鄓鄴釶釾鋣鍱鎁鎑鐷靨頁餘餣饁饐馀馌驜鵺鸈黦一以已亿衣移依易医乙仪亦椅益倚姨翼译伊蛇遗食艾胰疑沂宜异彝壹蚁谊揖铱矣翌艺抑绎邑蛾屹尾役臆逸肄疫颐裔意毅忆义夷溢诣议怿痍镒癔怡驿旖熠酏翊欹峄圯殪嗌咦懿噫劓诒饴漪佚咿瘗猗眙羿弈苡荑仡佾贻钇缢迤刈悒黟翳弋奕蜴埸挹嶷薏呓轶镱舣丿乁乂也亄伇伿佁佗侇俋偯儀億儗兿冝劮勚勩匇匜印叆叕台叹吚听呭呹唈噎囈圛圪坄坨垼埶墿壱夁夕失奇妷姬媐嫕嫛嬄嬑嬟孴它宐宧寱寲射峓崎崺嶧嶬巳巸帟帠幆庡廙弌弬彛彜彞彵忔怈怠恞悘悥憶懌戺扅扆扡择拸掎掜搋搤撎擇攺敡敼斁施旑昳晹暆曀曎曵杙杝枍枻柂栘栧栺桋棭椬椸榏槷槸樴檍檥檹櫂欥欭歖歝殔殹毉汽沶治泄泆洢洩洫浂浥浳渫湙潩澤澺瀷炈焉焬焱焲熈熙熤熪熼燚燡燱犄狋狏獈玴珆瑿瓵畩異疙痬瘞瘱睪瞖硪礒礙祎禕秇稦穓竩笖箷簃籎紲絏維綺縊繄繶繹绁绮维羛羠羡羨義耛耴肊膉艗艤芅苅苢萓萟蓺藙藝蘙虉蛜蛡蛦螔螘螠蟻衤衪衵袂袆袘袣裛裿褘褹襗襼觺訑訲訳詍詑詒詣誃誒誼謚謻譩譯議譺讉讛诶谥豙豛豷貖貤貽賹贀跇跠踦軼輗輢轙辥辷迆迭迱迻逘遺郼醫醳醷释釋釔釴釶鈘鈠鉇鉈鉯銕銥錡鎰鏔鐿钀铊锜阣阤陁陭隶隿雉霅霬靉靾頉頤頥顊顗飴饐駅驛骮鮧鮨鯣鳦鴺鶂鶃鶍鷁鷊鷖鷧鷾鸃鹝鹢鹥黓黝黳齮齸因引印银音饮阴隐荫吟尹寅茵淫殷姻烟堙鄞喑夤胤龈吲圻狺垠霪蚓氤铟窨瘾洇茚乑乚伒众侌傿冘凐听唫噖噾嚚囙圁垔垦垽堷壹婣婬峾崟崯嶾币廕愔慇慭憖憗懚斦朄栶梀檃檭檼櫽欭欽歅殥沂泿洕浔淾湚溵滛潭潯濥濦烎犾猌玪珢璌瘖癊癮硍碒磤禋秵筃粌絪緸縯芩苂荶蒑蔩蔭蘟螾蟫裀言訔訚訡訢誾諲讔赺趛輑酓酳釿鈏鈝銀銦闇闉阥陰陻隂隠隱霒霠靷鞇韾飮飲駰骃鮣鷣齗齦龂廴湮应硬影营迎映蝇赢鹰英颖莹盈婴樱缨荧萤萦楹蓥瘿茔鹦媵莺璎郢嘤撄瑛滢潆嬴罂瀛膺荥颍俓偀僌哽啨営噟嚶塋夃央媖嫈嬰孆孾嵤巆巊廮応愥應摬攍攖攚旲景暎朠柍桜桯梬櫻櫿泂浧渶溁溋滎潁濙濚濴瀅瀠瀯瀴灐灜焸煐熒營珱瑩瓔甇甖甸癭盁眏矨碤礯穎籝籯緓縄縈繩纓绬绳罃罌耺膡莖萾藀蘡蛍蝧蝿螢蠅蠳褮覮謍譍譻賏贏軈逞鎣鐛鑍锳鞕韹韺頴颕鴬鶧鶯鷪鷹鸚哟育唷喲嚛用涌永拥蛹勇雍咏泳佣踊痈庸臃恿壅慵俑墉鳙邕喁甬饔镛傛傭勈嗈噰埇塎嫞容嵱廱彮怺悀惥愑愹慂揘擁柡栐槦湧滽澭灉牅癕癰砽硧禜筩臾苚蒏蕹詠踴遇郺鄘醟銿鏞雝顒颙鯒鰫鱅鲬鷛有又由右油游幼优友铀忧尤犹诱悠邮酉佑釉幽疣攸蚰莠鱿卣黝莸猷蚴宥牖囿柚蝣莜鼬铕蝤繇呦侑丣亴偤優冘叹哊唀嚘坳奥妋姷孧尢尣峟峳庮怞怣怮憂懮戭扰揂揄斿栯梄梎楢槱櫌櫾汓汼沋泅泈泑浟湵滺瀀牗牰狖猶獶甴痏祐禉秞糿纋羐羑羗耰聈聱肬脜脩苃莤蒏蕕蚘蜏褎褏訧誘貁輏輶迶逌逰遊邎郵鄾酭鈾銪銹锈駀魷鮋鲉麀与于欲鱼雨余遇语愈狱玉渔予誉育愚羽虞娱淤舆屿禹宇迂俞逾域芋郁谷吁盂喻峪御愉粥渝尉榆隅浴寓裕预豫驭蔚妪嵛雩馀阈窬鹆妤揄窳觎臾舁龉蓣煜钰谀纡於竽瑜禺聿欤俣伛圄鹬庾昱萸瘐谕鬻圉瘀熨饫毓燠腴狳菀蜮蝓丂亏亐伃俁俼偊傴僪儥兪匬叞吳吾唷唹喁喅喐喩噊噢噳圫堉堣堬墺夕奥娛娪娯婾媀媮嫗嬩宛寙峿崛崳嵎嶎嶼庽彧忬悆悇惌惐慾懊懙或戫扜扵拗挧捓敔斔斞旟昙杅栩栯桙梧棛棜棫楀楡楰櫲欎欝歈歟歶汙汚污汩淢淯湡滪漁澚澞澦澳灪灹焴煨燏燰爩牏獄獝王玗玙琙琟瑀璵畬畭痏瘉癒盓睮矞砡硢礇礖礜祤禦秗稢稶穥穻箊篽籅籞籲紆緎繘罭羭翑腧與舒艅芌苑茟茰荢菸萭萮蒮蓹蕍蕷薁藇蘌蘛虶蜍蜟蝺螸蟈衘衙衧袬褕覦語諛諭謣譽貍貐貗踰軉輍輿轝迃逳遹邘郚鄅酑醧釪鈺銉鋊鋙錥鍝鐍鐭铻閼閾阏陓隃隩雓霱預頨顒颙飫餘饇馭騟驈骬髃鬰鬱魊魚魣鮽鯲鰅鱊鱮鳿鴥鴧鴪鵒鷠鷸鸆鸒麌齬齵肀远员元院圆原愿园援猿怨冤源缘袁渊苑垣鸳辕圜鼋橼媛爰眢鸢掾芫沅瑗螈箢塬垸傆允剈厡厵咽員喛噮囦圎園圓夗妧妴媴嫄嫚嬽宛寃弲悁惌捐杬棩楥榞榬櫞涓涴淵渁渆渕湲溒灁焆猨獂盶禐穿笎緣縁羱肙葾蒝蒬薗薳蚖蜎蜵蝝蝯衏裫裷褑褤謜貟贠輐轅逺遠邍邧酛鈨鋺鎱阮陨隕願駌騵魭鳶鴛鵷鶢鶰鹓黿鼘鼝月越约跃阅乐岳悦曰说粤钥瀹钺刖龠栎樾哕哾噦囝块妁妜嬳岄嶽彟彠恱悅戉扚抈捳擽曱枂櫟汋烁焆爍爚玥矆矱礿禴箹篗籆籥籰粵約臒药蘥蚎蚏蛻蜕蠖說説趯跀跞躍躒軏鈅鉞銳鋭鑠铄锐閱閲髺鸑鸙黦龥云运晕允匀韵陨孕耘蕴酝郧员氲恽愠郓芸筠韫昀狁殒纭熨伝傊勻叞呍員喗囩均夽奫妘媪媼尉尹怨惲愪慍抎抣暈枟榅樂橒殞氳沄涒涢温溳澐煇煴煾熅熉玧畇瘟盾眃磒秐筍筼篔紜緷緼縕縜繧缊耺腪苑荺菀蒀蒕蒷蕓蕰薀藴蘊蜵蝹褞貟賱贇贠赟輼轀辒運鄆鄖醖醞鈗鋆阭隕雲霣韗韞韻頵餫馧馻齫齳杂砸咋匝扎咱咂拶啈啐喒嘁噈囃囋帀桚沞沯磼籴紮臜襍鉔雑雜雥韴魳曱在再灾载栽宰哉甾崽仔傤儎才扗洅渽溨災烖睵縡菑賳載酨咱暂攒赞簪趱糌瓒拶昝錾偺儧儹兂喒囋寁揝撍攢暫桚涔湔濺濽灒瓉瓚禶穳篸簮臢襸讃讚賛贊趲蹔鄼酂酇鏨鏩鐕鐟饡脏葬赃藏奘臧驵匨塟弉戕牂牫羘臓臟蔵賍賘贓贜銺駔驡髒早造遭糟灶燥枣凿躁藻皂噪澡蚤唣傮唕喿慥栆梍棗槽煰璅璪皁窖竃竈簉繅繰缫缲艁草薻謲譟趮蹧醩则责择泽咋侧箦舴帻迮啧仄昃笮赜伬側則厕厠唶啫嘖夨嫧崱幘庂廁択捑措擇昗柞樍歵汄沢泎溭滜澤灂皟睪瞔矠礋稄稷簀耫萚葃蔶蘀蠌襗諎謫謮讁谪責賾飵鸅齚齰贼蠈賊鯽鰂鱡鲗鲫怎谮僭囎撍譖譛增赠憎曾综缯罾甑锃増曽橧熷璔矰磳綜縡繒譄贈鄫鋥鬷鱛扎炸渣闸眨榨乍轧诈铡札蜡查栅咋砟痄吒哳楂猹蚱揸喋柞咤齄偞偧冊册剳劄厏哆喥囃奓宱怍扠抯拃挓挿插揷搩搾摣擖柤柵樝渫溠潳灹煠牐甴皶皻笮箑箚紥紮耫膪苲苴蔖蕏藸蚻觰詐諎謯譇譗踷蹅軋迊醡鍘閘霅鞢鮓鮺鰈鲊鲝鲽齇齟齰龃馇喳摘窄债斋寨择翟宅侧祭砦瘵亝側債厇厏啇嚌夈度抧捚擇擿斎柴榸檡牴疵箦簀粂膪責责鉙駘骀骴站占战盏沾粘毡展栈詹颤蘸湛绽斩辗崭瞻谵搌旃亶佔偡噡嫸嵁嶃嶄嶘嶦怗惉戦戰拃斬旜栴桟棧椾榐橏欃氈氊湔澶琖皽盞碊綻菚薝虥虦蛅袒襢覱詀謙譧譫讝谦趈跕蹍躔輚輾轏邅醆醮閚霑颭飐飦餰饘驏驙骣魙鱣鳣鳽鸇鹯點黵张章长帐仗丈掌涨账樟杖彰漳胀瘴障仉嫜幛鄣璋嶂獐蟑仧傽墇帳幥弡張慞扙承暲涱漲痮瘬瞕礃粀粻脹蔁賬遧鏱鐣長镸鞝餦騿鱆麞找着照招罩爪兆朝昭沼肇嘲召赵棹啁钊笊诏佋啅垗妱巶旐晁曌枛桃櫂淖濯炤燳爫狣瑵皽盄瞾窼箌罀羄肁肈菬著蚤詔謿趙釗釽鉊鍣駋鮡鳭鼂鼌着这者折遮蛰哲蔗锗辙浙柘辄赭摺鹧磔褶蜇谪乇仛厇啠喆嗫嗻嘀嚞囁埑堵嫬庶悊慹扸摂摄攝斥晢晣杔棏樀樜歽淛潪矺砓籷粍耷聂聑聶虴蟄蟅袩褚襵詟謫謶謺讁讋軼輒輙轍轶這適銸鍺陬馲驝鮿鷓鷙鸷著真阵镇针震枕振斟珍疹诊甄砧臻贞侦缜蓁祯箴轸榛稹赈朕鸩胗浈桢畛圳椹侲偵唇坫塡塦填姫嫃寊屒帪弫慎戡抮挋揕搸敒敶昣朾枮栕栚桭楨榐槇樼殝沴沵湞溱滇潧澵獉珎瑧眕眞眹碪禎禛竧籈紖紾絼縝縥纼聄萙葴蒖薽蜄袗裖覙診誫謓貞賑趁趂軫轃辴迧遉酖酙針鈂鉁鋴錱鍖鍼鎭鎮陣陳靕駗鴆黮黰鼎鼑帧正整睁争挣征怔证症郑拯丁蒸狰政峥钲铮筝诤徵鲭丞伥佂倀凧埥埩塣姃媜崝崢嶒幀徎徰徴愸憕承抍掙掟揁撜敞晸止氶浧湞炡烝爭猙町癥眐睜瞠箏篜糽綪聇脀証諍證趟踭鄭鉦錚鬇鮏鯖鯹鴊帧只之直知制指纸支芝枝稚吱蜘质肢脂汁炙织职痔植抵殖执值侄址滞止趾治旨窒志挚掷至致置帜识峙氏智秩帙摭黹桎枳轵忮祉蛭膣觯郅栀彘芷祗咫鸷絷踬胝骘轾痣陟踯雉埴贽卮酯豸跖栉乿亊伎俧倁値偫傂儨凪剬劕劧厔咥嚔坁坧垁埃執墆墌多夛妷姪娡媞嬂实寘實崻巵帋幟庢庤廌徏徔徝徴徵恃恉慹憄懥懫戠扺扻抧拓拞挃捗搘搱摕摨摯擲擳擿斦旘昵晊杝杫柣栺栽梔梽椥楖榰槜樀樲樴櫍櫛歭氐汥汦沚泜洔洷淽滍滯漐潌潪瀄熫犆狾猘瓆瓡畤疐疷疻瘈眰砋礩示祁祇祑祬禃禔禵秇秓秖秪积秲秷稙稺穉筫紙紩絺綕緻縶織翐耆聀職胑胵膱臷臸芖茋茝菭薙藢蘵虒蚔螲蟙衹衼袟袠製襧覟觗觝觶訨誌謢識豑豒貭質贄跱踶蹛蹠蹢躑躓軄軹軽輊迟迣遟遲郦酈釞鉄銍銴鋕鑕铁铚锧阤阯陁隲隻馶馽駤騭騺驇鯯鳩鳷鴙鴲鶨鷙鸠鼅夂中重种钟肿众终盅忠仲衷踵舯螽锺冢忪乑伀偅刣喠堹塚妐妕媑尰幒彸徸柊歱汷泈潼炂煄狆瘇眾祌種穜童筗籦終緟腫舂茽董蔠蚛蚣蝩螤蟲衆衳衶褈諥蹱迚鈆鈡銿鍾鐘鴤鼨夂周洲皱粥州轴舟昼骤宙诌肘帚咒繇胄纣荮啁碡绉籀妯酎伷侏侜倜僽冑呪咮啄喌喙噣嚋婤府徟扭掫晝晭柚椆注洀淍炿烐珘甃疛皺盩睭矪祝箒籒籕粙紂紬縐翢胕舳菷葤薵詋詶調諏謅譸诪诹调賙赒軸輈輖辀逐週郮鈾銂铀霌駎駲騆騶驟驺鬻鯞鵃鸼住主猪竹株煮筑贮铸嘱拄注祝驻属术珠瞩蛛朱柱诸诛逐助烛蛀潴洙伫瘃翥茱苎橥舳杼箸炷侏铢疰渚褚躅麈邾槠竺予佇劅劚劯咮嗻噣囑坾墸壴孎宁宔尌屬嵀庶搊敱斀斗斸曯朝枓柠柷楮樦櫡櫧櫫欘殶泏泞澍濐瀦灟炢煑燭爥眝矚砫硃磩祩秼窋竚笁笜筯築篫篴紵紸絑纻罜羜芧苧茁茿莇蓫蕏薥藷藸蚰蝫蠋蠩蠾袾註詝誅諸豬貯跓跙跦軴迬逗逫鉏鉒銖鋳鑄钃阻除陼霔飳馵駐駯驺鮢鯺鱁鴸著丶抓爪挝摣撾檛簻膼髽抓抓拽转尵捙睉跩顡嘬转专砖赚传撰篆颛馔啭沌傳僎僝剸叀囀堟塼嫥孨専專恮抟摶湍漙灷瑑瑼甎磚竱篹篿簨籑縳耑腞膞蒃蟤襈諯譔賺転轉鄟顓饌鱄装撞庄壮桩状幢妆僮奘戆丬壯壵妝娤庒憧戅戇梉樁湷漴焋狀獞粧糚艟荘莊裝贑贛赣追坠缀锥赘椎骓惴缒隹倕垂埀墜娷揣槌沝甀畷硾磓礈笍箠綴縋腏膇致萑諈贅轛醀醊錐錗錣鎚鑆隊隧餟騅准谆屯肫窀凖啍圫埻宒忳旽淳湻準甽盹稕純綧纯胗衠訰諄迍飩饨黱捉桌着啄拙灼浊卓琢缴茁酌擢焯濯诼浞涿倬镯禚斫丵剢劅勺叕啅啜噣圴坧墌妰娺彴捔掇撯擆斀斮斱斲斵晫梲棁棳棹椓槕櫡汋淖準濁灂炪烵犳狵琸矠硺穛穱窡窧箸篧籗籱繳罬聉肫蓔蕞藋蝃蠗蠿諁諑謶趠趵踔蹠躅鉵鋜鐯鐲鵫鷟杓著字自子紫籽资姿吱滓仔兹咨孜渍滋淄笫粢龇秭恣谘趑缁梓鲻锱孳耔觜髭赀茈訾嵫眦姊辎事倳剚吇呰呲啙嗞姉姕孖孶崰杍栥椔榟橴次沝泚洓湽漬澬牸玆璾甾疵眥矷禌秄秶稵穧紎緇胏胔胾芓茊茡茲菑葘蓻薋虸訿諮貲資赼趦跐載輜輺载鄑釨鈭鋅錙鍿鎡锌镃頾頿鯔鰦鶅鼒齊齍齐齜总纵宗棕综踪鬃偬粽枞腙倊倧傯堫嵏嵕嵸從惣惾愡捴揔搃摠昮朡椶樅潀潈潨熜熧燪猔猣疭瘲碂磫稯糉綜緃総緫緵縂縦縱總翪艐葼蓗蓯蝬豵踨蹤錝鍯鏓鑁騌騣骔鬉鬷鯮鯼咗唨唨走揍奏邹鲰鄹陬驺诹偢媰掫搊族棷棸楱箃緅芻菆諏赱郰鄒騶鯐鯫黀齱齺组族足阻租祖诅菹镞卒俎伜伹倅傶卆哫啐嘁岨崒崪徂怚柤沮淬爼珇砠稡箤紣組綷苴葅蒩詛謯趱趲踤踿蹴鉃鉏鉐錊鎐鎺鏃鑿靻顇駔驵阻钻纂赚缵躜攥劗揝撮攒攢欑篹籫繤纉纘賺躦鑚鑽最嘴醉罪堆咀觜蕞厜嗺噿嫢嶉嶊嶵摧撮晬朘枠栬槯樶檇檌欈濢璻睟祽稡穝絊纗羧脧蟕辠酔酨酻鋷錊雋尊遵鳟撙樽僎僔噂墫奠嶟拵捘捽栫瀳繜罇袸譐跧踆蹲銌鐏鱒鶎鷷做作坐左座昨凿琢撮佐笮酢唑祚胙怍阼柞乍侳咗岝岞挫捽柮椊砟秨稓筰糳繓苲莋葃葄蓙袏諎醋鈼鑿飵嘬阝"
    Private gb2312 As String = "啊阿埃挨哎唉哀皑癌蔼矮艾碍爱隘鞍氨安俺按暗岸胺案肮昂盎凹敖熬翱袄傲奥懊澳芭捌扒叭吧笆八疤巴拔跋靶把耙坝霸罢爸白柏百摆佰败拜稗斑班搬扳般颁板版扮拌伴瓣半办绊邦帮梆榜膀绑棒磅蚌镑傍谤苞胞包褒剥薄雹保堡饱宝抱报暴豹鲍爆杯碑悲卑北辈背贝钡倍狈备惫焙被奔苯本笨崩绷甭泵蹦迸逼鼻比鄙笔彼碧蓖蔽毕毙毖币庇痹闭敝弊必辟壁臂避陛鞭边编贬扁便变卞辨辩辫遍标彪膘表鳖憋别瘪彬斌濒滨宾摈兵冰柄丙秉饼炳病并玻菠播拨钵波博勃搏铂箔伯帛舶脖膊渤泊驳捕卜哺补埠不布步簿部怖擦猜裁材才财睬踩采彩菜蔡餐参蚕残惭惨灿苍舱仓沧藏操糙槽曹草厕策侧册测层蹭插叉茬茶查碴搽察岔差诧拆柴豺搀掺蝉馋谗缠铲产阐颤昌猖场尝常长偿肠厂敞畅唱倡超抄钞朝嘲潮巢吵炒车扯撤掣彻澈郴臣辰尘晨忱沉陈趁衬撑称城橙成呈乘程惩澄诚承逞骋秤吃痴持匙池迟弛驰耻齿侈尺赤翅斥炽充冲虫崇宠抽酬畴踌稠愁筹仇绸瞅丑臭初出橱厨躇锄雏滁除楚础储矗搐触处揣川穿椽传船喘串疮窗幢床闯创吹炊捶锤垂春椿醇唇淳纯蠢戳绰疵茨磁雌辞慈瓷词此刺赐次聪葱囱匆从丛凑粗醋簇促蹿篡窜摧崔催脆瘁粹淬翠村存寸磋撮搓措挫错搭达答瘩打大呆歹傣戴带殆代贷袋待逮怠耽担丹单郸掸胆旦氮但惮淡诞弹蛋当挡党荡档刀捣蹈倒岛祷导到稻悼道盗德得的蹬灯登等瞪凳邓堤低滴迪敌笛狄涤翟嫡抵底地蒂第帝弟递缔颠掂滇碘点典靛垫电佃甸店惦奠淀殿碉叼雕凋刁掉吊钓调跌爹碟蝶迭谍叠丁盯叮钉顶鼎锭定订丢东冬董懂动栋侗恫冻洞兜抖斗陡豆逗痘都督毒犊独读堵睹赌杜镀肚度渡妒端短锻段断缎堆兑队对墩吨蹲敦顿囤钝盾遁掇哆多夺垛躲朵跺舵剁惰堕蛾峨鹅俄额讹娥恶厄扼遏鄂饿恩而儿耳尔饵洱二贰发罚筏伐乏阀法珐藩帆番翻樊矾钒繁凡烦反返范贩犯饭泛坊芳方肪房防妨仿访纺放菲非啡飞肥匪诽吠肺废沸费芬酚吩氛分纷坟焚汾粉奋份忿愤粪丰封枫蜂峰锋风疯烽逢冯缝讽奉凤佛否夫敷肤孵扶拂辐幅氟符伏俘服浮涪福袱弗甫抚辅俯釜斧脯腑府腐赴副覆赋复傅付阜父腹负富讣附妇缚咐噶嘎该改概钙盖溉干甘杆柑竿肝赶感秆敢赣冈刚钢缸肛纲岗港杠篙皋高膏羔糕搞镐稿告哥歌搁戈鸽胳疙割革葛格蛤阁隔铬个各给根跟耕更庚羹埂耿梗工攻功恭龚供躬公宫弓巩汞拱贡共钩勾沟苟狗垢构购够辜菇咕箍估沽孤姑鼓古蛊骨谷股故顾固雇刮瓜剐寡挂褂乖拐怪棺关官冠观管馆罐惯灌贯光广逛瑰规圭硅归龟闺轨鬼诡癸桂柜跪贵刽辊滚棍锅郭国果裹过哈骸孩海氦亥害骇酣憨邯韩含涵寒函喊罕翰撼捍旱憾悍焊汗汉夯杭航壕嚎豪毫郝好耗号浩呵喝荷菏核禾和何合盒貉阂河涸赫褐鹤贺嘿黑痕很狠恨哼亨横衡恒轰哄烘虹鸿洪宏弘红喉侯猴吼厚候后呼乎忽瑚壶葫胡蝴狐糊湖弧虎唬护互沪户花哗华猾滑画划化话槐徊怀淮坏欢环桓还缓换患唤痪豢焕涣宦幻荒慌黄磺蝗簧皇凰惶煌晃幌恍谎灰挥辉徽恢蛔回毁悔慧卉惠晦贿秽会烩汇讳诲绘荤昏婚魂浑混豁活伙火获或惑霍货祸击圾基机畸稽积箕肌饥迹激讥鸡姬绩缉吉极棘辑籍集及急疾汲即嫉级挤几脊己蓟技冀季伎祭剂悸济寄寂计记既忌际妓继纪嘉枷夹佳家加荚颊贾甲钾假稼价架驾嫁歼监坚尖笺间煎兼肩艰奸缄茧检柬碱硷拣捡简俭剪减荐槛鉴践贱见键箭件健舰剑饯渐溅涧建僵姜将浆江疆蒋桨奖讲匠酱降蕉椒礁焦胶交郊浇骄娇嚼搅铰矫侥脚狡角饺缴绞剿教酵轿较叫窖揭接皆秸街阶截劫节桔杰捷睫竭洁结解姐戒藉芥界借介疥诫届巾筋斤金今津襟紧锦仅谨进靳晋禁近烬浸尽劲荆兢茎睛晶鲸京惊精粳经井警景颈静境敬镜径痉靖竟竞净炯窘揪究纠玖韭久灸九酒厩救旧臼舅咎就疚鞠拘狙疽居驹菊局咀矩举沮聚拒据巨具距踞锯俱句惧炬剧捐鹃娟倦眷卷绢撅攫抉掘倔爵觉决诀绝均菌钧军君峻俊竣浚郡骏喀咖卡咯开揩楷凯慨刊堪勘坎砍看康慷糠扛抗亢炕考拷烤靠坷苛柯棵磕颗科壳咳可渴克刻客课肯啃垦恳坑吭空恐孔控抠口扣寇枯哭窟苦酷库裤夸垮挎跨胯块筷侩快宽款匡筐狂框矿眶旷况亏盔岿窥葵奎魁傀馈愧溃坤昆捆困括扩廓阔垃拉喇蜡腊辣啦莱来赖蓝婪栏拦篮阑兰澜谰揽览懒缆烂滥琅榔狼廊郎朗浪捞劳牢老佬姥酪烙涝勒乐雷镭蕾磊累儡垒擂肋类泪棱楞冷厘梨犁黎篱狸离漓理李里鲤礼莉荔吏栗丽厉励砾历利傈例俐痢立粒沥隶力璃哩俩联莲连镰廉怜涟帘敛脸链恋炼练粮凉梁粱良两辆量晾亮谅撩聊僚疗燎寥辽潦了撂镣廖料列裂烈劣猎琳林磷霖临邻鳞淋凛赁吝拎玲菱零龄铃伶羚凌灵陵岭领另令溜琉榴硫馏留刘瘤流柳六龙聋咙笼窿隆垄拢陇楼娄搂篓漏陋芦卢颅庐炉掳卤虏鲁麓碌露路赂鹿潞禄录陆戮驴吕铝侣旅履屡缕虑氯律率滤绿峦挛孪滦卵乱掠略抡轮伦仑沦纶论萝螺罗逻锣箩骡裸落洛骆络妈麻玛码蚂马骂嘛吗埋买麦卖迈脉瞒馒蛮满蔓曼慢漫谩芒茫盲氓忙莽猫茅锚毛矛铆卯茂冒帽貌贸么玫枚梅酶霉煤没眉媒镁每美昧寐妹媚门闷们萌蒙檬盟锰猛梦孟眯醚靡糜迷谜弥米秘觅泌蜜密幂棉眠绵冕免勉娩缅面苗描瞄藐秒渺庙妙蔑灭民抿皿敏悯闽明螟鸣铭名命谬摸摹蘑模膜磨摩魔抹末莫墨默沫漠寞陌谋牟某拇牡亩姆母墓暮幕募慕木目睦牧穆拿哪呐钠那娜纳氖乃奶耐奈南男难囊挠脑恼闹淖呢馁内嫩能妮霓倪泥尼拟你匿腻逆溺蔫拈年碾撵捻念娘酿鸟尿捏聂孽啮镊镍涅您柠狞凝宁拧泞牛扭钮纽脓浓农弄奴努怒女暖虐疟挪懦糯诺哦欧鸥殴藕呕偶沤啪趴爬帕怕琶拍排牌徘湃派攀潘盘磐盼畔判叛乓庞旁耪胖抛咆刨炮袍跑泡呸胚培裴赔陪配佩沛喷盆砰抨烹澎彭蓬棚硼篷膨朋鹏捧碰坯砒霹批披劈琵毗啤脾疲皮匹痞僻屁譬篇偏片骗飘漂瓢票撇瞥拼频贫品聘乒坪苹萍平凭瓶评屏坡泼颇婆破魄迫粕剖扑铺仆莆葡菩蒲埔朴圃普浦谱曝瀑期欺栖戚妻七凄漆柒沏其棋奇歧畦崎脐齐旗祈祁骑起岂乞企启契砌器气迄弃汽泣讫掐恰洽牵扦钎铅千迁签仟谦乾黔钱钳前潜遣浅谴堑嵌欠歉枪呛腔羌墙蔷强抢橇锹敲悄桥瞧乔侨巧鞘撬翘峭俏窍切茄且怯窃钦侵亲秦琴勤芹擒禽寝沁青轻氢倾卿清擎晴氰情顷请庆琼穷秋丘邱球求囚酋泅趋区蛆曲躯屈驱渠取娶龋趣去圈颧权醛泉全痊拳犬券劝缺炔瘸却鹊榷确雀裙群然燃冉染瓤壤攘嚷让饶扰绕惹热壬仁人忍韧任认刃妊纫扔仍日戎茸蓉荣融熔溶容绒冗揉柔肉茹蠕儒孺如辱乳汝入褥软阮蕊瑞锐闰润若弱撒洒萨腮鳃塞赛三叁伞散桑嗓丧搔骚扫嫂瑟色涩森僧莎砂杀刹沙纱傻啥煞筛晒珊苫杉山删煽衫闪陕擅赡膳善汕扇缮墒伤商赏晌上尚裳梢捎稍烧芍勺韶少哨邵绍奢赊蛇舌舍赦摄射慑涉社设砷申呻伸身深娠绅神沈审婶甚肾慎渗声生甥牲升绳省盛剩胜圣师失狮施湿诗尸虱十石拾时什食蚀实识史矢使屎驶始式示士世柿事拭誓逝势是嗜噬适仕侍释饰氏市恃室视试收手首守寿授售受瘦兽蔬枢梳殊抒输叔舒淑疏书赎孰熟薯暑曙署蜀黍鼠属术述树束戍竖墅庶数漱恕刷耍摔衰甩帅栓拴霜双爽谁水睡税吮瞬顺舜说硕朔烁斯撕嘶思私司丝死肆寺嗣四伺似饲巳松耸怂颂送宋讼诵搜艘擞嗽苏酥俗素速粟僳塑溯宿诉肃酸蒜算虽隋随绥髓碎岁穗遂隧祟孙损笋蓑梭唆缩琐索锁所塌他它她塔獭挞蹋踏胎苔抬台泰酞太态汰坍摊贪瘫滩坛檀痰潭谭谈坦毯袒碳探叹炭汤塘搪堂棠膛唐糖倘躺淌趟烫掏涛滔绦萄桃逃淘陶讨套特藤腾疼誊梯剔踢锑提题蹄啼体替嚏惕涕剃屉天添填田甜恬舔腆挑条迢眺跳贴铁帖厅听烃汀廷停亭庭挺艇通桐酮瞳同铜彤童桶捅筒统痛偷投头透凸秃突图徒途涂屠土吐兔湍团推颓腿蜕褪退吞屯臀拖托脱鸵陀驮驼椭妥拓唾挖哇蛙洼娃瓦袜歪外豌弯湾玩顽丸烷完碗挽晚皖惋宛婉万腕汪王亡枉网往旺望忘妄威巍微危韦违桅围唯惟为潍维苇萎委伟伪尾纬未蔚味畏胃喂魏位渭谓尉慰卫瘟温蚊文闻纹吻稳紊问嗡翁瓮挝蜗涡窝我斡卧握沃巫呜钨乌污诬屋无芜梧吾吴毋武五捂午舞伍侮坞戊雾晤物勿务悟误昔熙析西硒矽晰嘻吸锡牺稀息希悉膝夕惜熄烯溪汐犀檄袭席习媳喜铣洗系隙戏细瞎虾匣霞辖暇峡侠狭下厦夏吓掀锨先仙鲜纤咸贤衔舷闲涎弦嫌显险现献县腺馅羡宪陷限线相厢镶香箱襄湘乡翔祥详想响享项巷橡像向象萧硝霄削哮嚣销消宵淆晓小孝校肖啸笑效楔些歇蝎鞋协挟携邪斜胁谐写械卸蟹懈泄泻谢屑薪芯锌欣辛新忻心信衅星腥猩惺兴刑型形邢行醒幸杏性姓兄凶胸匈汹雄熊休修羞朽嗅锈秀袖绣墟戌需虚嘘须徐许蓄酗叙旭序畜恤絮婿绪续轩喧宣悬旋玄选癣眩绚靴薛学穴雪血勋熏循旬询寻驯巡殉汛训讯逊迅压押鸦鸭呀丫芽牙蚜崖衙涯雅哑亚讶焉咽阉烟淹盐严研蜒岩延言颜阎炎沿奄掩眼衍演艳堰燕厌砚雁唁彦焰宴谚验殃央鸯秧杨扬佯疡羊洋阳氧仰痒养样漾邀腰妖瑶摇尧遥窑谣姚咬舀药要耀椰噎耶爷野冶也页掖业叶曳腋夜液一壹医揖铱依伊衣颐夷遗移仪胰疑沂宜姨彝椅蚁倚已乙矣以艺抑易邑屹亿役臆逸肄疫亦裔意毅忆义益溢诣议谊译异翼翌绎茵荫因殷音阴姻吟银淫寅饮尹引隐印英樱婴鹰应缨莹萤营荧蝇迎赢盈影颖硬映哟拥佣臃痈庸雍踊蛹咏泳涌永恿勇用幽优悠忧尤由邮铀犹油游酉有友右佑釉诱又幼迂淤于盂榆虞愚舆余俞逾鱼愉渝渔隅予娱雨与屿禹宇语羽玉域芋郁吁遇喻峪御愈欲狱育誉浴寓裕预豫驭鸳渊冤元垣袁原援辕园员圆猿源缘远苑愿怨院曰约越跃钥岳粤月悦阅耘云郧匀陨允运蕴酝晕韵孕匝砸杂栽哉灾宰载再在咱攒暂赞赃脏葬遭糟凿藻枣早澡蚤躁噪造皂灶燥责择则泽贼怎增憎曾赠扎喳渣札轧铡闸眨栅榨咋乍炸诈摘斋宅窄债寨瞻毡詹粘沾盏斩辗崭展蘸栈占战站湛绽樟章彰漳张掌涨杖丈帐账仗胀瘴障招昭找沼赵照罩兆肇召遮折哲蛰辙者锗蔗这浙珍斟真甄砧臻贞针侦枕疹诊震振镇阵蒸挣睁征狰争怔整拯正政帧症郑证芝枝支吱蜘知肢脂汁之织职直植殖执值侄址指止趾只旨纸志挚掷至致置帜峙制智秩稚质炙痔滞治窒中盅忠钟衷终种肿重仲众舟周州洲诌粥轴肘帚咒皱宙昼骤珠株蛛朱猪诸诛逐竹烛煮拄瞩嘱主著柱助蛀贮铸筑住注祝驻抓爪拽专砖转撰赚篆桩庄装妆撞壮状椎锥追赘坠缀谆准捉拙卓桌琢茁酌啄着灼浊兹咨资姿滋淄孜紫仔籽滓子自渍字鬃棕踪宗综总纵邹走奏揍租足卒族祖诅阻组钻纂嘴醉最罪尊遵昨左佐柞做作坐座亍丌兀丐廿卅丕亘丞鬲孬噩丨禺丿匕乇夭爻卮氐囟胤馗毓睾鼗丶亟鼐乜乩亓芈孛啬嘏仄厍厝厣厥厮靥赝匚叵匦匮匾赜卦卣刂刈刎刭刳刿剀剌剞剡剜蒯剽劂劁劐劓冂罔亻仃仉仂仨仡仫仞伛仳伢佤仵伥伧伉伫佞佧攸佚佝佟佗伲伽佶佴侑侉侃侏佾佻侪佼侬侔俦俨俪俅俚俣俜俑俟俸倩偌俳倬倏倮倭俾倜倌倥倨偾偃偕偈偎偬偻傥傧傩傺僖儆僭僬僦僮儇儋仝氽佘佥俎龠汆籴兮巽黉馘冁夔勹匍訇匐凫夙兕亠兖亳衮袤亵脔裒禀嬴蠃羸冫冱冽冼凇冖冢冥讠讦讧讪讴讵讷诂诃诋诏诎诒诓诔诖诘诙诜诟诠诤诨诩诮诰诳诶诹诼诿谀谂谄谇谌谏谑谒谔谕谖谙谛谘谝谟谠谡谥谧谪谫谮谯谲谳谵谶卩卺阝阢阡阱阪阽阼陂陉陔陟陧陬陲陴隈隍隗隰邗邛邝邙邬邡邴邳邶邺邸邰郏郅邾郐郄郇郓郦郢郜郗郛郫郯郾鄄鄢鄞鄣鄱鄯鄹酃酆刍奂劢劬劭劾哿勐勖勰叟燮矍廴凵凼鬯厶弁畚巯坌垩垡塾墼壅壑圩圬圪圳圹圮圯坜圻坂坩垅坫垆坼坻坨坭坶坳垭垤垌垲埏垧垴垓垠埕埘埚埙埒垸埴埯埸埤埝堋堍埽埭堀堞堙塄堠塥塬墁墉墚墀馨鼙懿艹艽艿芏芊芨芄芎芑芗芙芫芸芾芰苈苊苣芘芷芮苋苌苁芩芴芡芪芟苄苎芤苡茉苷苤茏茇苜苴苒苘茌苻苓茑茚茆茔茕苠苕茜荑荛荜茈莒茼茴茱莛荞茯荏荇荃荟荀茗荠茭茺茳荦荥荨茛荩荬荪荭荮莰荸莳莴莠莪莓莜莅荼莶莩荽莸荻莘莞莨莺莼菁萁菥菘堇萘萋菝菽菖萜萸萑萆菔菟萏萃菸菹菪菅菀萦菰菡葜葑葚葙葳蒇蒈葺蒉葸萼葆葩葶蒌蒎萱葭蓁蓍蓐蓦蒽蓓蓊蒿蒺蓠蒡蒹蒴蒗蓥蓣蔌甍蔸蓰蔹蔟蔺蕖蔻蓿蓼蕙蕈蕨蕤蕞蕺瞢蕃蕲蕻薤薨薇薏蕹薮薜薅薹薷薰藓藁藜藿蘧蘅蘩蘖蘼廾弈夼奁耷奕奚奘匏尢尥尬尴扌扪抟抻拊拚拗拮挢拶挹捋捃掭揶捱捺掎掴捭掬掊捩掮掼揲揸揠揿揄揞揎摒揆掾摅摁搋搛搠搌搦搡摞撄摭撖摺撷撸撙撺擀擐擗擤擢攉攥攮弋忒甙弑卟叱叽叩叨叻吒吖吆呋呒呓呔呖呃吡呗呙吣吲咂咔呷呱呤咚咛咄呶呦咝哐咭哂咴哒咧咦哓哔呲咣哕咻咿哌哙哚哜咩咪咤哝哏哞唛哧唠哽唔哳唢唣唏唑唧唪啧喏喵啉啭啁啕唿啐唼唷啖啵啶啷唳唰啜喋嗒喃喱喹喈喁喟啾嗖喑啻嗟喽喾喔喙嗪嗷嗉嘟嗑嗫嗬嗔嗦嗝嗄嗯嗥嗲嗳嗌嗍嗨嗵嗤辔嘞嘈嘌嘁嘤嘣嗾嘀嘧嘭噘嘹噗嘬噍噢噙噜噌噔嚆噤噱噫噻噼嚅嚓嚯囔囗囝囡囵囫囹囿圄圊圉圜帏帙帔帑帱帻帼帷幄幔幛幞幡岌屺岍岐岖岈岘岙岑岚岜岵岢岽岬岫岱岣峁岷峄峒峤峋峥崂崃崧崦崮崤崞崆崛嵘崾崴崽嵬嵛嵯嵝嵫嵋嵊嵩嵴嶂嶙嶝豳嶷巅彳彷徂徇徉後徕徙徜徨徭徵徼衢彡犭犰犴犷犸狃狁狎狍狒狨狯狩狲狴狷猁狳猃狺狻猗猓猡猊猞猝猕猢猹猥猬猸猱獐獍獗獠獬獯獾舛夥飧夤夂饣饧饨饩饪饫饬饴饷饽馀馄馇馊馍馐馑馓馔馕庀庑庋庖庥庠庹庵庾庳赓廒廑廛廨廪膺忄忉忖忏怃忮怄忡忤忾怅怆忪忭忸怙怵怦怛怏怍怩怫怊怿怡恸恹恻恺恂恪恽悖悚悭悝悃悒悌悛惬悻悱惝惘惆惚悴愠愦愕愣惴愀愎愫慊慵憬憔憧憷懔懵忝隳闩闫闱闳闵闶闼闾阃阄阆阈阊阋阌阍阏阒阕阖阗阙阚丬爿戕氵汔汜汊沣沅沐沔沌汨汩汴汶沆沩泐泔沭泷泸泱泗沲泠泖泺泫泮沱泓泯泾洹洧洌浃浈洇洄洙洎洫浍洮洵洚浏浒浔洳涑浯涞涠浞涓涔浜浠浼浣渚淇淅淞渎涿淠渑淦淝淙渖涫渌涮渫湮湎湫溲湟溆湓湔渲渥湄滟溱溘滠漭滢溥溧溽溻溷滗溴滏溏滂溟潢潆潇漤漕滹漯漶潋潴漪漉漩澉澍澌潸潲潼潺濑濉澧澹澶濂濡濮濞濠濯瀚瀣瀛瀹瀵灏灞宀宄宕宓宥宸甯骞搴寤寮褰寰蹇謇辶迓迕迥迮迤迩迦迳迨逅逄逋逦逑逍逖逡逵逶逭逯遄遑遒遐遨遘遢遛暹遴遽邂邈邃邋彐彗彖彘尻咫屐屙孱屣屦羼弪弩弭艴弼鬻屮妁妃妍妩妪妣妗姊妫妞妤姒妲妯姗妾娅娆姝娈姣姘姹娌娉娲娴娑娣娓婀婧婊婕娼婢婵胬媪媛婷婺媾嫫媲嫒嫔媸嫠嫣嫱嫖嫦嫘嫜嬉嬗嬖嬲嬷孀尕尜孚孥孳孑孓孢驵驷驸驺驿驽骀骁骅骈骊骐骒骓骖骘骛骜骝骟骠骢骣骥骧纟纡纣纥纨纩纭纰纾绀绁绂绉绋绌绐绔绗绛绠绡绨绫绮绯绱绲缍绶绺绻绾缁缂缃缇缈缋缌缏缑缒缗缙缜缛缟缡缢缣缤缥缦缧缪缫缬缭缯缰缱缲缳缵幺畿巛甾邕玎玑玮玢玟珏珂珑玷玳珀珉珈珥珙顼琊珩珧珞玺珲琏琪瑛琦琥琨琰琮琬琛琚瑁瑜瑗瑕瑙瑷瑭瑾璜璎璀璁璇璋璞璨璩璐璧瓒璺韪韫韬杌杓杞杈杩枥枇杪杳枘枧杵枨枞枭枋杷杼柰栉柘栊柩枰栌柙枵柚枳柝栀柃枸柢栎柁柽栲栳桠桡桎桢桄桤梃栝桕桦桁桧桀栾桊桉栩梵梏桴桷梓桫棂楮棼椟椠棹椤棰椋椁楗棣椐楱椹楠楂楝榄楫榀榘楸椴槌榇榈槎榉楦楣楹榛榧榻榫榭槔榱槁槊槟榕槠榍槿樯槭樗樘橥槲橄樾檠橐橛樵檎橹樽樨橘橼檑檐檩檗檫猷獒殁殂殇殄殒殓殍殚殛殡殪轫轭轱轲轳轵轶轸轷轹轺轼轾辁辂辄辇辋辍辎辏辘辚軎戋戗戛戟戢戡戥戤戬臧瓯瓴瓿甏甑甓攴旮旯旰昊昙杲昃昕昀炅曷昝昴昱昶昵耆晟晔晁晏晖晡晗晷暄暌暧暝暾曛曜曦曩贲贳贶贻贽赀赅赆赈赉赇赍赕赙觇觊觋觌觎觏觐觑牮犟牝牦牯牾牿犄犋犍犏犒挈挲掰搿擘耄毪毳毽毵毹氅氇氆氍氕氘氙氚氡氩氤氪氲攵敕敫牍牒牖爰虢刖肟肜肓肼朊肽肱肫肭肴肷胧胨胩胪胛胂胄胙胍胗朐胝胫胱胴胭脍脎胲胼朕脒豚脶脞脬脘脲腈腌腓腴腙腚腱腠腩腼腽腭腧塍媵膈膂膑滕膣膪臌朦臊膻臁膦欤欷欹歃歆歙飑飒飓飕飙飚殳彀毂觳斐齑斓於旆旄旃旌旎旒旖炀炜炖炝炻烀炷炫炱烨烊焐焓焖焯焱煳煜煨煅煲煊煸煺熘熳熵熨熠燠燔燧燹爝爨灬焘煦熹戾戽扃扈扉礻祀祆祉祛祜祓祚祢祗祠祯祧祺禅禊禚禧禳忑忐怼恝恚恧恁恙恣悫愆愍慝憩憝懋懑戆肀聿沓泶淼矶矸砀砉砗砘砑斫砭砜砝砹砺砻砟砼砥砬砣砩硎硭硖硗砦硐硇硌硪碛碓碚碇碜碡碣碲碹碥磔磙磉磬磲礅磴礓礤礞礴龛黹黻黼盱眄眍盹眇眈眚眢眙眭眦眵眸睐睑睇睃睚睨睢睥睿瞍睽瞀瞌瞑瞟瞠瞰瞵瞽町畀畎畋畈畛畲畹疃罘罡罟詈罨罴罱罹羁罾盍盥蠲钅钆钇钋钊钌钍钏钐钔钗钕钚钛钜钣钤钫钪钭钬钯钰钲钴钶钷钸钹钺钼钽钿铄铈铉铊铋铌铍铎铐铑铒铕铖铗铙铘铛铞铟铠铢铤铥铧铨铪铩铫铮铯铳铴铵铷铹铼铽铿锃锂锆锇锉锊锍锎锏锒锓锔锕锖锘锛锝锞锟锢锪锫锩锬锱锲锴锶锷锸锼锾锿镂锵镄镅镆镉镌镎镏镒镓镔镖镗镘镙镛镞镟镝镡镢镤镥镦镧镨镩镪镫镬镯镱镲镳锺矧矬雉秕秭秣秫稆嵇稃稂稞稔稹稷穑黏馥穰皈皎皓皙皤瓞瓠甬鸠鸢鸨鸩鸪鸫鸬鸲鸱鸶鸸鸷鸹鸺鸾鹁鹂鹄鹆鹇鹈鹉鹋鹌鹎鹑鹕鹗鹚鹛鹜鹞鹣鹦鹧鹨鹩鹪鹫鹬鹱鹭鹳疒疔疖疠疝疬疣疳疴疸痄疱疰痃痂痖痍痣痨痦痤痫痧瘃痱痼痿瘐瘀瘅瘌瘗瘊瘥瘘瘕瘙瘛瘼瘢瘠癀瘭瘰瘿瘵癃瘾瘳癍癞癔癜癖癫癯翊竦穸穹窀窆窈窕窦窠窬窨窭窳衤衩衲衽衿袂袢裆袷袼裉裢裎裣裥裱褚裼裨裾裰褡褙褓褛褊褴褫褶襁襦襻疋胥皲皴矜耒耔耖耜耠耢耥耦耧耩耨耱耋耵聃聆聍聒聩聱覃顸颀颃颉颌颍颏颔颚颛颞颟颡颢颥颦虍虔虬虮虿虺虼虻蚨蚍蚋蚬蚝蚧蚣蚪蚓蚩蚶蛄蚵蛎蚰蚺蚱蚯蛉蛏蚴蛩蛱蛲蛭蛳蛐蜓蛞蛴蛟蛘蛑蜃蜇蛸蜈蜊蜍蜉蜣蜻蜞蜥蜮蜚蜾蝈蜴蜱蜩蜷蜿螂蜢蝽蝾蝻蝠蝰蝌蝮螋蝓蝣蝼蝤蝙蝥螓螯螨蟒蟆螈螅螭螗螃螫蟥螬螵螳蟋蟓螽蟑蟀蟊蟛蟪蟠蟮蠖蠓蟾蠊蠛蠡蠹蠼缶罂罄罅舐竺竽笈笃笄笕笊笫笏筇笸笪笙笮笱笠笥笤笳笾笞筘筚筅筵筌筝筠筮筻筢筲筱箐箦箧箸箬箝箨箅箪箜箢箫箴篑篁篌篝篚篥篦篪簌篾篼簏簖簋簟簪簦簸籁籀臾舁舂舄臬衄舡舢舣舭舯舨舫舸舻舳舴舾艄艉艋艏艚艟艨衾袅袈裘裟襞羝羟羧羯羰羲籼敉粑粝粜粞粢粲粼粽糁糇糌糍糈糅糗糨艮暨羿翎翕翥翡翦翩翮翳糸絷綦綮繇纛麸麴赳趄趔趑趱赧赭豇豉酊酐酎酏酤酢酡酰酩酯酽酾酲酴酹醌醅醐醍醑醢醣醪醭醮醯醵醴醺豕鹾趸跫踅蹙蹩趵趿趼趺跄跖跗跚跞跎跏跛跆跬跷跸跣跹跻跤踉跽踔踝踟踬踮踣踯踺蹀踹踵踽踱蹉蹁蹂蹑蹒蹊蹰蹶蹼蹯蹴躅躏躔躐躜躞豸貂貊貅貘貔斛觖觞觚觜觥觫觯訾謦靓雩雳雯霆霁霈霏霎霪霭霰霾龀龃龅龆龇龈龉龊龌黾鼋鼍隹隼隽雎雒瞿雠銎銮鋈錾鍪鏊鎏鐾鑫鱿鲂鲅鲆鲇鲈稣鲋鲎鲐鲑鲒鲔鲕鲚鲛鲞鲟鲠鲡鲢鲣鲥鲦鲧鲨鲩鲫鲭鲮鲰鲱鲲鲳鲴鲵鲶鲷鲺鲻鲼鲽鳄鳅鳆鳇鳊鳋鳌鳍鳎鳏鳐鳓鳔鳕鳗鳘鳙鳜鳝鳟鳢靼鞅鞑鞒鞔鞯鞫鞣鞲鞴骱骰骷鹘骶骺骼髁髀髅髂髋髌髑魅魃魇魉魈魍魑飨餍餮饕饔髟髡髦髯髫髻髭髹鬈鬏鬓鬟鬣麽麾縻麂麇麈麋麒鏖麝麟黛黜黝黠黟黢黩黧黥黪黯鼢鼬鼯鼹鼷鼽鼾齄"
    Private gb2312_1 As String = "啊阿埃挨哎唉哀皑癌蔼矮艾碍爱隘鞍氨安俺按暗岸胺案肮昂盎凹敖熬翱袄傲奥懊澳芭捌扒叭吧笆八疤巴拔跋靶把耙坝霸罢爸白柏百摆佰败拜稗斑班搬扳般颁板版扮拌伴瓣半办绊邦帮梆榜膀绑棒磅蚌镑傍谤苞胞包褒剥薄雹保堡饱宝抱报暴豹鲍爆杯碑悲卑北辈背贝钡倍狈备惫焙被奔苯本笨崩绷甭泵蹦迸逼鼻比鄙笔彼碧蓖蔽毕毙毖币庇痹闭敝弊必辟壁臂避陛鞭边编贬扁便变卞辨辩辫遍标彪膘表鳖憋别瘪彬斌濒滨宾摈兵冰柄丙秉饼炳病并玻菠播拨钵波博勃搏铂箔伯帛舶脖膊渤泊驳捕卜哺补埠不布步簿部怖擦猜裁材才财睬踩采彩菜蔡餐参蚕残惭惨灿苍舱仓沧藏操糙槽曹草厕策侧册测层蹭插叉茬茶查碴搽察岔差诧拆柴豺搀掺蝉馋谗缠铲产阐颤昌猖场尝常长偿肠厂敞畅唱倡超抄钞朝嘲潮巢吵炒车扯撤掣彻澈郴臣辰尘晨忱沉陈趁衬撑称城橙成呈乘程惩澄诚承逞骋秤吃痴持匙池迟弛驰耻齿侈尺赤翅斥炽充冲虫崇宠抽酬畴踌稠愁筹仇绸瞅丑臭初出橱厨躇锄雏滁除楚础储矗搐触处揣川穿椽传船喘串疮窗幢床闯创吹炊捶锤垂春椿醇唇淳纯蠢戳绰疵茨磁雌辞慈瓷词此刺赐次聪葱囱匆从丛凑粗醋簇促蹿篡窜摧崔催脆瘁粹淬翠村存寸磋撮搓措挫错搭达答瘩打大呆歹傣戴带殆代贷袋待逮怠耽担丹单郸掸胆旦氮但惮淡诞弹蛋当挡党荡档刀捣蹈倒岛祷导到稻悼道盗德得的蹬灯登等瞪凳邓堤低滴迪敌笛狄涤翟嫡抵底地蒂第帝弟递缔颠掂滇碘点典靛垫电佃甸店惦奠淀殿碉叼雕凋刁掉吊钓调跌爹碟蝶迭谍叠丁盯叮钉顶鼎锭定订丢东冬董懂动栋侗恫冻洞兜抖斗陡豆逗痘都督毒犊独读堵睹赌杜镀肚度渡妒端短锻段断缎堆兑队对墩吨蹲敦顿囤钝盾遁掇哆多夺垛躲朵跺舵剁惰堕蛾峨鹅俄额讹娥恶厄扼遏鄂饿恩而儿耳尔饵洱二贰发罚筏伐乏阀法珐藩帆番翻樊矾钒繁凡烦反返范贩犯饭泛坊芳方肪房防妨仿访纺放菲非啡飞肥匪诽吠肺废沸费芬酚吩氛分纷坟焚汾粉奋份忿愤粪丰封枫蜂峰锋风疯烽逢冯缝讽奉凤佛否夫敷肤孵扶拂辐幅氟符伏俘服浮涪福袱弗甫抚辅俯釜斧脯腑府腐赴副覆赋复傅付阜父腹负富讣附妇缚咐噶嘎该改概钙盖溉干甘杆柑竿肝赶感秆敢赣冈刚钢缸肛纲岗港杠篙皋高膏羔糕搞镐稿告哥歌搁戈鸽胳疙割革葛格蛤阁隔铬个各给根跟耕更庚羹埂耿梗工攻功恭龚供躬公宫弓巩汞拱贡共钩勾沟苟狗垢构购够辜菇咕箍估沽孤姑鼓古蛊骨谷股故顾固雇刮瓜剐寡挂褂乖拐怪棺关官冠观管馆罐惯灌贯光广逛瑰规圭硅归龟闺轨鬼诡癸桂柜跪贵刽辊滚棍锅郭国果裹过哈骸孩海氦亥害骇酣憨邯韩含涵寒函喊罕翰撼捍旱憾悍焊汗汉夯杭航壕嚎豪毫郝好耗号浩呵喝荷菏核禾和何合盒貉阂河涸赫褐鹤贺嘿黑痕很狠恨哼亨横衡恒轰哄烘虹鸿洪宏弘红喉侯猴吼厚候后呼乎忽瑚壶葫胡蝴狐糊湖弧虎唬护互沪户花哗华猾滑画划化话槐徊怀淮坏欢环桓还缓换患唤痪豢焕涣宦幻荒慌黄磺蝗簧皇凰惶煌晃幌恍谎灰挥辉徽恢蛔回毁悔慧卉惠晦贿秽会烩汇讳诲绘荤昏婚魂浑混豁活伙火获或惑霍货祸击圾基机畸稽积箕肌饥迹激讥鸡姬绩缉吉极棘辑籍集及急疾汲即嫉级挤几脊己蓟技冀季伎祭剂悸济寄寂计记既忌际妓继纪嘉枷夹佳家加荚颊贾甲钾假稼价架驾嫁歼监坚尖笺间煎兼肩艰奸缄茧检柬碱硷拣捡简俭剪减荐槛鉴践贱见键箭件健舰剑饯渐溅涧建僵姜将浆江疆蒋桨奖讲匠酱降蕉椒礁焦胶交郊浇骄娇嚼搅铰矫侥脚狡角饺缴绞剿教酵轿较叫窖揭接皆秸街阶截劫节桔杰捷睫竭洁结解姐戒藉芥界借介疥诫届巾筋斤金今津襟紧锦仅谨进靳晋禁近烬浸尽劲荆兢茎睛晶鲸京惊精粳经井警景颈静境敬镜径痉靖竟竞净炯窘揪究纠玖韭久灸九酒厩救旧臼舅咎就疚鞠拘狙疽居驹菊局咀矩举沮聚拒据巨具距踞锯俱句惧炬剧捐鹃娟倦眷卷绢撅攫抉掘倔爵觉决诀绝均菌钧军君峻俊竣浚郡骏喀咖卡咯开揩楷凯慨刊堪勘坎砍看康慷糠扛抗亢炕考拷烤靠坷苛柯棵磕颗科壳咳可渴克刻客课肯啃垦恳坑吭空恐孔控抠口扣寇枯哭窟苦酷库裤夸垮挎跨胯块筷侩快宽款匡筐狂框矿眶旷况亏盔岿窥葵奎魁傀馈愧溃坤昆捆困括扩廓阔垃拉喇蜡腊辣啦莱来赖蓝婪栏拦篮阑兰澜谰揽览懒缆烂滥琅榔狼廊郎朗浪捞劳牢老佬姥酪烙涝勒乐雷镭蕾磊累儡垒擂肋类泪棱楞冷厘梨犁黎篱狸离漓理李里鲤礼莉荔吏栗丽厉励砾历利傈例俐痢立粒沥隶力璃哩俩联莲连镰廉怜涟帘敛脸链恋炼练粮凉梁粱良两辆量晾亮谅撩聊僚疗燎寥辽潦了撂镣廖料列裂烈劣猎琳林磷霖临邻鳞淋凛赁吝拎玲菱零龄铃伶羚凌灵陵岭领另令溜琉榴硫馏留刘瘤流柳六龙聋咙笼窿隆垄拢陇楼娄搂篓漏陋芦卢颅庐炉掳卤虏鲁麓碌露路赂鹿潞禄录陆戮驴吕铝侣旅履屡缕虑氯律率滤绿峦挛孪滦卵乱掠略抡轮伦仑沦纶论萝螺罗逻锣箩骡裸落洛骆络妈麻玛码蚂马骂嘛吗埋买麦卖迈脉瞒馒蛮满蔓曼慢漫谩芒茫盲氓忙莽猫茅锚毛矛铆卯茂冒帽貌贸么玫枚梅酶霉煤没眉媒镁每美昧寐妹媚门闷们萌蒙檬盟锰猛梦孟眯醚靡糜迷谜弥米秘觅泌蜜密幂棉眠绵冕免勉娩缅面苗描瞄藐秒渺庙妙蔑灭民抿皿敏悯闽明螟鸣铭名命谬摸摹蘑模膜磨摩魔抹末莫墨默沫漠寞陌谋牟某拇牡亩姆母墓暮幕募慕木目睦牧穆拿哪呐钠那娜纳氖乃奶耐奈南男难囊挠脑恼闹淖呢馁内嫩能妮霓倪泥尼拟你匿腻逆溺蔫拈年碾撵捻念娘酿鸟尿捏聂孽啮镊镍涅您柠狞凝宁拧泞牛扭钮纽脓浓农弄奴努怒女暖虐疟挪懦糯诺哦欧鸥殴藕呕偶沤啪趴爬帕怕琶拍排牌徘湃派攀潘盘磐盼畔判叛乓庞旁耪胖抛咆刨炮袍跑泡呸胚培裴赔陪配佩沛喷盆砰抨烹澎彭蓬棚硼篷膨朋鹏捧碰坯砒霹批披劈琵毗啤脾疲皮匹痞僻屁譬篇偏片骗飘漂瓢票撇瞥拼频贫品聘乒坪苹萍平凭瓶评屏坡泼颇婆破魄迫粕剖扑铺仆莆葡菩蒲埔朴圃普浦谱曝瀑期欺栖戚妻七凄漆柒沏其棋奇歧畦崎脐齐旗祈祁骑起岂乞企启契砌器气迄弃汽泣讫掐恰洽牵扦钎铅千迁签仟谦乾黔钱钳前潜遣浅谴堑嵌欠歉枪呛腔羌墙蔷强抢橇锹敲悄桥瞧乔侨巧鞘撬翘峭俏窍切茄且怯窃钦侵亲秦琴勤芹擒禽寝沁青轻氢倾卿清擎晴氰情顷请庆琼穷秋丘邱球求囚酋泅趋区蛆曲躯屈驱渠取娶龋趣去圈颧权醛泉全痊拳犬券劝缺炔瘸却鹊榷确雀裙群然燃冉染瓤壤攘嚷让饶扰绕惹热壬仁人忍韧任认刃妊纫扔仍日戎茸蓉荣融熔溶容绒冗揉柔肉茹蠕儒孺如辱乳汝入褥软阮蕊瑞锐闰润若弱撒洒萨腮鳃塞赛三叁伞散桑嗓丧搔骚扫嫂瑟色涩森僧莎砂杀刹沙纱傻啥煞筛晒珊苫杉山删煽衫闪陕擅赡膳善汕扇缮墒伤商赏晌上尚裳梢捎稍烧芍勺韶少哨邵绍奢赊蛇舌舍赦摄射慑涉社设砷申呻伸身深娠绅神沈审婶甚肾慎渗声生甥牲升绳省盛剩胜圣师失狮施湿诗尸虱十石拾时什食蚀实识史矢使屎驶始式示士世柿事拭誓逝势是嗜噬适仕侍释饰氏市恃室视试收手首守寿授售受瘦兽蔬枢梳殊抒输叔舒淑疏书赎孰熟薯暑曙署蜀黍鼠属术述树束戍竖墅庶数漱恕刷耍摔衰甩帅栓拴霜双爽谁水睡税吮瞬顺舜说硕朔烁斯撕嘶思私司丝死肆寺嗣四伺似饲巳松耸怂颂送宋讼诵搜艘擞嗽苏酥俗素速粟僳塑溯宿诉肃酸蒜算虽隋随绥髓碎岁穗遂隧祟孙损笋蓑梭唆缩琐索锁所塌他它她塔獭挞蹋踏胎苔抬台泰酞太态汰坍摊贪瘫滩坛檀痰潭谭谈坦毯袒碳探叹炭汤塘搪堂棠膛唐糖倘躺淌趟烫掏涛滔绦萄桃逃淘陶讨套特藤腾疼誊梯剔踢锑提题蹄啼体替嚏惕涕剃屉天添填田甜恬舔腆挑条迢眺跳贴铁帖厅听烃汀廷停亭庭挺艇通桐酮瞳同铜彤童桶捅筒统痛偷投头透凸秃突图徒途涂屠土吐兔湍团推颓腿蜕褪退吞屯臀拖托脱鸵陀驮驼椭妥拓唾挖哇蛙洼娃瓦袜歪外豌弯湾玩顽丸烷完碗挽晚皖惋宛婉万腕汪王亡枉网往旺望忘妄威巍微危韦违桅围唯惟为潍维苇萎委伟伪尾纬未蔚味畏胃喂魏位渭谓尉慰卫瘟温蚊文闻纹吻稳紊问嗡翁瓮挝蜗涡窝我斡卧握沃巫呜钨乌污诬屋无芜梧吾吴毋武五捂午舞伍侮坞戊雾晤物勿务悟误昔熙析西硒矽晰嘻吸锡牺稀息希悉膝夕惜熄烯溪汐犀檄袭席习媳喜铣洗系隙戏细瞎虾匣霞辖暇峡侠狭下厦夏吓掀锨先仙鲜纤咸贤衔舷闲涎弦嫌显险现献县腺馅羡宪陷限线相厢镶香箱襄湘乡翔祥详想响享项巷橡像向象萧硝霄削哮嚣销消宵淆晓小孝校肖啸笑效楔些歇蝎鞋协挟携邪斜胁谐写械卸蟹懈泄泻谢屑薪芯锌欣辛新忻心信衅星腥猩惺兴刑型形邢行醒幸杏性姓兄凶胸匈汹雄熊休修羞朽嗅锈秀袖绣墟戌需虚嘘须徐许蓄酗叙旭序畜恤絮婿绪续轩喧宣悬旋玄选癣眩绚靴薛学穴雪血勋熏循旬询寻驯巡殉汛训讯逊迅压押鸦鸭呀丫芽牙蚜崖衙涯雅哑亚讶焉咽阉烟淹盐严研蜒岩延言颜阎炎沿奄掩眼衍演艳堰燕厌砚雁唁彦焰宴谚验殃央鸯秧杨扬佯疡羊洋阳氧仰痒养样漾邀腰妖瑶摇尧遥窑谣姚咬舀药要耀椰噎耶爷野冶也页掖业叶曳腋夜液一壹医揖铱依伊衣颐夷遗移仪胰疑沂宜姨彝椅蚁倚已乙矣以艺抑易邑屹亿役臆逸肄疫亦裔意毅忆义益溢诣议谊译异翼翌绎茵荫因殷音阴姻吟银淫寅饮尹引隐印英樱婴鹰应缨莹萤营荧蝇迎赢盈影颖硬映哟拥佣臃痈庸雍踊蛹咏泳涌永恿勇用幽优悠忧尤由邮铀犹油游酉有友右佑釉诱又幼迂淤于盂榆虞愚舆余俞逾鱼愉渝渔隅予娱雨与屿禹宇语羽玉域芋郁吁遇喻峪御愈欲狱育誉浴寓裕预豫驭鸳渊冤元垣袁原援辕园员圆猿源缘远苑愿怨院曰约越跃钥岳粤月悦阅耘云郧匀陨允运蕴酝晕韵孕匝砸杂栽哉灾宰载再在咱攒暂赞赃脏葬遭糟凿藻枣早澡蚤躁噪造皂灶燥责择则泽贼怎增憎曾赠扎喳渣札轧铡闸眨栅榨咋乍炸诈摘斋宅窄债寨瞻毡詹粘沾盏斩辗崭展蘸栈占战站湛绽樟章彰漳张掌涨杖丈帐账仗胀瘴障招昭找沼赵照罩兆肇召遮折哲蛰辙者锗蔗这浙珍斟真甄砧臻贞针侦枕疹诊震振镇阵蒸挣睁征狰争怔整拯正政帧症郑证芝枝支吱蜘知肢脂汁之织职直植殖执值侄址指止趾只旨纸志挚掷至致置帜峙制智秩稚质炙痔滞治窒中盅忠钟衷终种肿重仲众舟周州洲诌粥轴肘帚咒皱宙昼骤珠株蛛朱猪诸诛逐竹烛煮拄瞩嘱主著柱助蛀贮铸筑住注祝驻抓爪拽专砖转撰赚篆桩庄装妆撞壮状椎锥追赘坠缀谆准捉拙卓桌琢茁酌啄着灼浊兹咨资姿滋淄孜紫仔籽滓子自渍字鬃棕踪宗综总纵邹走奏揍租足卒族祖诅阻组钻纂嘴醉最罪尊遵昨左佐柞做作坐座"
    Private mapFrequency As Hashtable = Nothing

    Private mapPinyin As Hashtable = Nothing
    Private mapMtlPinyin As Hashtable = Nothing

    ''' <summary>
    ''' 取得词序Map对象（文字:词序）
    ''' </summary>
    ''' <returns>词序Map</returns>
    Public Function GetWordFreqMap() As Hashtable

        If Not mapFrequency Is Nothing Then
            Return mapFrequency
        End If

        Dim map As New Hashtable

        Dim lines As String() = GZipDecompress(My.Resources.淡定词序).Split(vbNewLine)
        Dim iMax As Integer = lines.Length
        For i As Integer = 0 To lines.Length - 1
            Dim line As String = lines(i).Replace(vbLf, "")

            map(line) = iMax - i
        Next


        mapFrequency = map
        Return mapFrequency
    End Function

    ''' <summary>
    ''' 文件格式转换
    ''' 【文字Tab拼音Tab频率】 -> 【文字Tab频率】
    ''' </summary>
    ''' <param name="sFile">待转换文件</param>
    ''' <returns>转换后文件</returns>
    Public Function ToGbkSortedWordFile(ByVal sFile As String) As String

        Dim txt As String = My.Computer.FileSystem.ReadAllText(sFile, Encoding.UTF8)
        Dim lines As String() = txt.Split(vbNewLine)
        Dim buf As New StringBuilder
        Dim bufErr As New StringBuilder

        Dim map As New Hashtable
        Dim lst As New List(Of CWord)

        For i As Integer = 0 To lines.Length - 1
            Dim line As String = Trim(lines(i).Replace(vbLf, ""))
            If "".Equals(line) Then
                Continue For
            End If


            Dim cols As String() = Strings.Split(line, vbTab)
            cols(0) = Trim(cols(0))
            If "".Equals(Trim(cols(0))) OrElse cols(0).Length = 1 OrElse Not IsNumeric(cols(2)) OrElse CLng(cols(2)) = 1 Then
                Continue For    ' 文字为空/单字/频率非数字/频率等于一，忽略跳过
            End If

            ' 重复文字，忽略跳过（以第一个为准）
            If Not map.ContainsKey(cols(0)) Then

                ' 含非GBK汉字时，忽略跳过
                Dim bGb As Boolean = True
                For j As Integer = 0 To cols(0).Length - 1
                    If Not gbk.Contains(cols(0).Substring(j, 1)) Then
                        bGb = False
                        Exit For
                    End If
                Next
                If bGb Then
                    map(cols(0)) = CLng(cols(2))

                    Dim word As New CWord
                    word.Text = cols(0)
                    word.Order = map(cols(0))
                    lst.Add(word)
                End If

            End If
        Next

        ' 排序 （频率相同时按文字排序，频率不同时按频率排序）
        lst.Sort(Function(w1 As CWord, w2 As CWord)
                     If w1.Order = w2.Order Then
                         Return w1.Text.CompareTo(w2.Text)
                     Else
                         Return w1.Order > w2.Order
                     End If
                 End Function)

        ' 仅保存文字，按行输出，排前面的频率高
        For i As Integer = 0 To lst.Count - 1
            buf.AppendLine(lst(i).Text & vbTab & lst(i).Order)
        Next


        Dim sPath As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & "\\淡定拼音"
        If Not My.Computer.FileSystem.DirectoryExists(sPath) Then
            My.Computer.FileSystem.CreateDirectory(sPath)
        End If
        sPath = sPath & "\\" & Now.ToString("yyyy-MM-dd-HH-mm-ss")
        If Not My.Computer.FileSystem.DirectoryExists(sPath) Then
            My.Computer.FileSystem.CreateDirectory(sPath)
        End If
        Dim sOutFile As String = sPath & "\\" & My.Computer.FileSystem.GetFileInfo(sFile).Name

        My.Computer.FileSystem.WriteAllText(sOutFile & ".完成.txt", buf.ToString, False, Encoding.UTF8)

        Return sPath
    End Function

    Public Function GetPinyinMap() As Hashtable

        If Not mapPinyin Is Nothing Then
            Return mapPinyin
        End If

        Dim map As New Hashtable

        Dim lines As String() = My.Resources.淡定字典.Split(vbNewLine)
        For i As Integer = 0 To lines.Length - 1
            Dim line As String = lines(i).Replace(vbLf, "")
            If "".Equals(line) Then
                Continue For
            End If

            Dim cols As String() = line.Split(vbTab)
            map(cols(0)) = cols(1)
        Next


        mapPinyin = map
        Return mapPinyin
    End Function

    Public Function GetMtlPinyinMap() As Hashtable

        If Not mapMtlPinyin Is Nothing Then
            Return mapMtlPinyin
        End If

        Dim map As New Hashtable

        Dim lines As String() = My.Resources.多音词库.Split(vbNewLine)
        For i As Integer = 0 To lines.Length - 1
            Dim line As String = lines(i).Replace(vbLf, "")
            If "".Equals(line) OrElse line.IndexOf(vbTab) < 0 Then
                Continue For
            End If

            Dim cols As String() = line.Split(vbTab)
            map(cols(0)) = cols(1)
            map(line) = line
        Next


        mapMtlPinyin = map
        Return mapMtlPinyin
    End Function


    ''' <summary>
    ''' 取得汉字拼音，多个汉字时拼音用单引号拼接
    ''' </summary>
    ''' <param name="words">汉字</param>
    ''' <returns>拼音</returns>
    Public Function GetPinyin(ByVal words As String) As String

        If words = Nothing OrElse "".Equals(words) Then
            Return ""
        End If

        Dim pys As New List(Of String)
        Dim w As String
        For i As Integer = 0 To words.Length - 1
            w = words.Substring(i, 1)
            If GetPinyinMap().ContainsKey(w) Then
                pys.Add(GetPinyinMap()(w))

            Else
                ' pys.Add("")     ' 非汉字无拼音
            End If
        Next

        If pys.Count = 0 Then
            Return ""
        End If
        Return Strings.Join(pys.ToArray, "'")

    End Function


    ''' <summary>
    ''' 取得汉字拼音，多个汉字时拼音用单引号拼接
    ''' </summary>
    ''' <param name="words">汉字</param>
    ''' <returns>拼音</returns>
    Public Function GetMtlPinyin(ByVal words As String) As String

        If words = Nothing OrElse "".Equals(words) Then
            Return ""
        End If

        If GetMtlPinyinMap().ContainsKey(words) Then
            Return GetMtlPinyinMap()(words)
        End If

        Dim pys As New List(Of String)
        Dim w As String
        Dim py As String
        For i As Integer = 0 To words.Length - 1
            w = words.Substring(i, 1)
            If GetPinyinMap().ContainsKey(w) Then
                py = GetPinyinMap()(w)
                If py.IndexOf(",") < 0 Then
                    pys.Add(GetPinyinMap()(w))
                    Continue For
                End If

                py = GetMtlPinyin(words, i)
                If py.IndexOf(",") < 0 Then
                    pys.Add(py)
                    Continue For
                End If

                pys.Add(GetPinyinMap()(w))

            Else
                ' pys.Add("")     ' 非汉字无拼音
            End If
        Next

        If pys.Count = 0 Then
            Return ""
        End If
        Return Strings.Join(pys.ToArray, "'")

    End Function

    ''' <summary>
    ''' 把带声调的拼音转换成无声调拼音
    ''' （拼音字母转换成英文字母，删除声调数字）
    ''' </summary>
    ''' <param name="zhuyin">汉字</param>
    ''' <returns>拼音</returns>
    Public Function ZhuyinToPinyin(ByVal zhuyin As String) As String

        If zhuyin = Nothing OrElse "".Equals(zhuyin) Then
            Return ""
        End If

        Dim py As String = zhuyin

        py = py.Replace("ā", "a").Replace("á", "a").Replace("ǎ", "a").Replace("à", "a")
        py = py.Replace("ē", "e").Replace("é", "e").Replace("ě", "e").Replace("è", "e")
        py = py.Replace("ī", "i").Replace("í", "i").Replace("ǐ", "i").Replace("ì", "i")
        py = py.Replace("ō", "o").Replace("ó", "o").Replace("ǒ", "o").Replace("ò", "o")
        py = py.Replace("ū", "u").Replace("ú", "u").Replace("ǔ", "u").Replace("ù", "u")
        py = py.Replace("lǖe", "lue").Replace("lǘe", "lue").Replace("lǚe", "lue").Replace("lǜe", "lue").Replace("lüe", "lue")
        py = py.Replace("lǖ", "lv").Replace("lǘ", "lv").Replace("lǚ", "lv").Replace("lǜ", "lv").Replace("lü", "lv")
        py = py.Replace("nǖe", "nue").Replace("nǘe", "nue").Replace("nǚe", "nue").Replace("nǜe", "nue").Replace("nüe", "nue")
        py = py.Replace("nǖ", "nv").Replace("nǘ", "nv").Replace("nǚ", "nv").Replace("nǜ", "nv").Replace("nü", "nv")
        py = py.Replace("ǖ", "u").Replace("ǘ", "u").Replace("ǚ", "u").Replace("ǜ", "u").Replace("ü", "u")
        py = py.Replace("ń", "n").Replace("ň", "n")
        py = py.Replace("ê", "e")
        py = py.Replace("ɑ", "a")
        py = py.Replace("ɡ", "g")
        py = py.Replace("0", "").Replace("1", "").Replace("2", "").Replace("3", "").Replace("4", "").Replace("5", "")

        Return py
    End Function

    ''' <summary>
    ''' 把汉字文件转换成带拼音文件 （多音字逗号分隔混合输出）
    ''' 【汉字】 -> 【汉字Tab拼音】
    ''' </summary>
    ''' <param name="sFile">汉字文件</param>
    ''' <returns>拼音文件</returns>
    Public Function ToPinyinFile(ByVal sFile As String) As String

        Dim txt As String = My.Computer.FileSystem.ReadAllText(sFile, Encoding.UTF8)
        Dim lines As String() = txt.Split(vbNewLine)
        Dim buf As New StringBuilder
        Dim py As String

        For i As Integer = 0 To lines.Length - 1
            Dim line As String = Trim(lines(i).Replace(vbLf, ""))
            If "".Equals(line) Then
                Continue For
            End If

            py = GetPinyin(line)
            If py.IndexOf(",") < 0 Then
                buf.AppendLine(line & vbTab & py)
            Else
                buf.AppendLine(line & vbTab & GetMtlPinyin(line))
            End If
        Next

        My.Computer.FileSystem.WriteAllText(sFile & ".ok.txt", buf.ToString, False, Encoding.UTF8)
        Return sFile & ".ok.txt"

    End Function

    ''' <summary>
    ''' 把汉字文件转换成带拼音文件 （多音字逗号分隔混合输出）
    ''' 【汉字】 -> 【汉字Tab拼音】
    ''' </summary>
    ''' <param name="sFile">汉字文件</param>
    ''' <returns>拼音文件</returns>
    Public Function ToPinyinFiles(ByVal sFile As String) As String

        Dim txt As String = My.Computer.FileSystem.ReadAllText(sFile, Encoding.UTF8)
        Dim lines As String() = txt.Split(vbNewLine)
        Dim buf As New StringBuilder
        Dim bufErr As New StringBuilder
        Dim bufErrOld As New StringBuilder

        For i As Integer = 0 To lines.Length - 1
            Dim line As String = Trim(lines(i).Replace(vbLf, "").Split(vbTab)(0))
            If line.Length = 0 OrElse line.StartsWith("//") Then
                Continue For
            End If

            Dim pys As String = GetPinyin(line)
            If Not pys = Nothing AndAlso pys.IndexOf(",") > 0 Then
                pys = GetMtlPinyin(line)
            End If

            If Not pys = Nothing AndAlso pys.IndexOf(",") > 0 Then
                bufErr.AppendLine(line & vbTab & pys)
                bufErrOld.AppendLine(lines(i).Replace(vbLf, ""))
            Else
                buf.AppendLine(line & vbTab & pys)
            End If
        Next


        Dim sPath As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & "\\淡定拼音"
        If Not My.Computer.FileSystem.DirectoryExists(sPath) Then
            My.Computer.FileSystem.CreateDirectory(sPath)
        End If
        sPath = sPath & "\\" & Now.ToString("yyyy-MM-dd-HH-mm-ss")
        If Not My.Computer.FileSystem.DirectoryExists(sPath) Then
            My.Computer.FileSystem.CreateDirectory(sPath)
        End If
        Dim sOutFile As String = sPath & "\\" & My.Computer.FileSystem.GetFileInfo(sFile).Name

        If buf.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".转换正确.txt", buf.ToString, False, Encoding.UTF8)
        End If
        If bufErr.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".含多音字.txt", bufErr.ToString, False, Encoding.UTF8)
        End If
        If bufErrOld.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".含多音字原文.txt", bufErrOld.ToString, False, Encoding.UTF8)
        End If

        Return sPath
    End Function


    ''' <summary>
    ''' 检查更新拼音文件
    ''' 【汉字Tab拼音】
    ''' </summary>
    ''' <param name="sFile">汉字文件</param>
    ''' <returns>拼音文件</returns>
    Public Function UpdatePinyin(ByVal sFile As String) As String

        Dim txt As String = My.Computer.FileSystem.ReadAllText(sFile, Encoding.UTF8)
        Dim lines As String() = txt.Split(vbNewLine)
        Dim buf As New StringBuilder
        Dim bufW1 As New StringBuilder
        Dim bufW2 As New StringBuilder
        Dim bufErr As New StringBuilder
        Dim bufM1 As New StringBuilder
        Dim bufM2 As New StringBuilder
        Dim bufMW1 As New StringBuilder
        Dim bufMW2 As New StringBuilder
        Dim bufUpd As New StringBuilder

        Dim sPinyin As String
        Dim cols As String()

        For i As Integer = 0 To lines.Length - 1
            Dim line As String = Trim(lines(i).Replace(vbLf, ""))
            If line.Length = 0 OrElse line.IndexOf(vbTab) < 0 Then
                Continue For
            End If

            cols = line.Split(vbTab)
            sPinyin = GetPinyin(cols(0))

            ' 含非汉字，无法转换
            If cols(0).Length <> sPinyin.Split("'").Length Then
                bufUpd.AppendLine(line)
                bufErr.AppendLine(cols(0) & vbTab & sPinyin)
                Continue For
            End If

            ' 不含多音字
            If sPinyin.IndexOf(",") < 0 Then
                bufUpd.AppendLine(cols(0) & vbTab & sPinyin)
                buf.AppendLine(line)

                If Not sPinyin.Equals(cols(1)) Then
                    ' 原拼音有误
                    bufW1.AppendLine(line)   ' 原拼音
                    bufW2.AppendLine(line & vbTab & sPinyin)     ' 原拼音加新拼音对照
                End If

                Continue For
            End If


            ' 含多音字
            If GetMtlPinyinMap().ContainsKey(cols(0) & vbTab & cols(1)) Then
                bufUpd.AppendLine(cols(0) & vbTab & cols(1))
                bufM1.AppendLine(cols(0) & vbTab & cols(1))   ' 使用多音词库的拼音
                Continue For
            End If

            sPinyin = GetMtlPinyin(cols(0))     ' 程序整理多音字
            ' 程序整理的多音字
            If sPinyin.IndexOf(",") < 0 Then
                bufUpd.AppendLine(cols(0) & vbTab & sPinyin)
                bufM1.AppendLine(cols(0) & vbTab & sPinyin)   ' 使用程序整理的拼音

                If Not sPinyin.Equals(cols(1)) Then
                    ' 原多音字拼音有误
                    bufMW1.AppendLine(line)   ' 原多音字拼音
                    bufMW2.AppendLine(line & vbTab & sPinyin)     ' 原多音字拼音加新拼音对照
                End If

                Continue For
            End If

            bufUpd.AppendLine(line)
            bufM2.AppendLine(line)
        Next


        Dim sPath As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & "\\淡定拼音"
        If Not My.Computer.FileSystem.DirectoryExists(sPath) Then
            My.Computer.FileSystem.CreateDirectory(sPath)
        End If
        sPath = sPath & "\\" & Now.ToString("yyyy-MM-dd-HH-mm-ss")
        If Not My.Computer.FileSystem.DirectoryExists(sPath) Then
            My.Computer.FileSystem.CreateDirectory(sPath)
        End If
        Dim sOutFile As String = sPath & "\\" & My.Computer.FileSystem.GetFileInfo(sFile).Name

        If bufUpd.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile, bufUpd.ToString, False, Encoding.UTF8)
        End If
        If buf.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".无多音字正确.txt", buf.ToString, False, Encoding.UTF8)
        End If
        If bufW1.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".拼音有误原文.txt", bufW1.ToString, False, Encoding.UTF8)
        End If
        If bufW2.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".拼音有误对照.txt", bufW2.ToString, False, Encoding.UTF8)
        End If
        If bufErr.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".无法转换.txt", bufErr.ToString, False, Encoding.UTF8)
        End If
        If bufM1.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".含多音字正确.txt", bufM1.ToString, False, Encoding.UTF8)
        End If
        If bufM2.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".含多音字原文.txt", bufM2.ToString, False, Encoding.UTF8)
        End If
        If bufMW1.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".多音字拼音有误原文.txt", bufMW1.ToString, False, Encoding.UTF8)
        End If
        If bufMW2.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".多音字拼音有误对照.txt", bufMW2.ToString, False, Encoding.UTF8)
        End If

        Return sPath
    End Function

    ''' <summary>
    ''' 把汉字文件转换成带拼音++文件
    ''' </summary>
    ''' <param name="sFile">汉字文件</param>
    ''' <returns>拼音文件</returns>
    Public Function ToPinyinPlusFiles(ByVal sFile As String) As String

        Dim txt As String = My.Computer.FileSystem.ReadAllText(sFile, Encoding.UTF8)
        Dim lines As String() = txt.Split(vbNewLine)
        Dim buf As New StringBuilder
        Dim bufErr As New StringBuilder
        Dim bufErr2 As New StringBuilder
        Dim sSingle As String
        Dim sPinyins As String()
        Dim sResult As String

        For i As Integer = 0 To lines.Length - 1
            Dim line As String = Trim(lines(i).Replace(vbLf, "").Split(vbTab)(0))
            If "".Equals(line) Then
                Continue For
            End If


            sPinyins = GetMtlPinyin(line).Split("'")
            If line.Length <> sPinyins.Length Then
                bufErr2.AppendLine(line & vbTab & GetMtlPinyin(line))
                Continue For
            End If

            sResult = ""
            For j As Integer = 0 To line.Length - 1
                sSingle = line.Substring(j, 1)
                sResult = sResult & sSingle

                If sPinyins(j).IndexOf(",") > 0 Then
                    sResult = sResult & sPinyins(j)
                End If
            Next

            If sResult.IndexOf(",") > 0 Then
                bufErr.AppendLine(sResult)
            Else
                buf.AppendLine(sResult)
            End If
        Next


        Dim sPath As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & "\\淡定拼音"
        If Not My.Computer.FileSystem.DirectoryExists(sPath) Then
            My.Computer.FileSystem.CreateDirectory(sPath)
        End If
        sPath = sPath & "\\" & Now.ToString("yyyy-MM-dd-HH-mm-ss")
        If Not My.Computer.FileSystem.DirectoryExists(sPath) Then
            My.Computer.FileSystem.CreateDirectory(sPath)
        End If
        Dim sOutFile As String = sPath & "\\" & My.Computer.FileSystem.GetFileInfo(sFile).Name

        If buf.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".无多音字.txt", buf.ToString, False, Encoding.UTF8)
        End If
        If bufErr.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".含多音字.txt", bufErr.ToString, False, Encoding.UTF8)
        End If
        If bufErr2.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".无法转换.txt", bufErr2.ToString, False, Encoding.UTF8)
        End If

        Return sPath
    End Function

    ''' <summary>
    ''' 导出第一列文字
    ''' </summary>
    ''' <param name="sFile">文件</param>
    ''' <returns>文字文件</returns>
    Public Function ToWordFile(ByVal sFile As String) As String

        Dim txt As String = My.Computer.FileSystem.ReadAllText(sFile, Encoding.UTF8)
        Dim lines As String() = txt.Split(vbNewLine)
        Dim buf As New StringBuilder
        Dim bufErr As New StringBuilder
        Dim bufErr2 As New StringBuilder
        Dim map As New Hashtable
        Dim tmp As String

        For i As Integer = 0 To lines.Length - 1
            Dim line As String = Trim(lines(i).Replace(vbLf, "").Split(vbTab)(0))
            If line.Length < 2 OrElse line.Length > 20 Then
                Continue For
            End If

            If line.StartsWith("//") Then
                buf.AppendLine(line)
                Continue For
            End If

            Dim j As Integer = 0
            Do While j < line.Length
                If Not gbk.Contains(line.Substring(j, 1)) Then
                    bufErr2.AppendLine(line)
                    Continue For
                End If
                j = j + 1
            Loop

            If line.IndexOf("，") > 0 Then
                tmp = line.Substring(0, line.IndexOf("，"))
                If Not map.ContainsKey(tmp) Then
                    buf.AppendLine(tmp)
                    map(tmp) = True
                End If

                tmp = line.Substring(line.IndexOf("，") + 1)
                If Not map.ContainsKey(tmp) Then
                    buf.AppendLine(tmp)
                    map(tmp) = True
                End If
            Else
                tmp = line
                If Not map.ContainsKey(tmp) Then
                    buf.AppendLine(tmp)
                    map(tmp) = True
                End If
            End If
        Next


        Dim sPath As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & "\\淡定拼音"
        If Not My.Computer.FileSystem.DirectoryExists(sPath) Then
            My.Computer.FileSystem.CreateDirectory(sPath)
        End If
        sPath = sPath & "\\" & Now.ToString("yyyy-MM-dd-HH-mm-ss")
        If Not My.Computer.FileSystem.DirectoryExists(sPath) Then
            My.Computer.FileSystem.CreateDirectory(sPath)
        End If
        Dim sOutFile As String = sPath & "\\" & My.Computer.FileSystem.GetFileInfo(sFile).Name

        My.Computer.FileSystem.WriteAllText(sOutFile & "汉字.txt", buf.ToString, False, Encoding.UTF8)

        If bufErr2.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & "含非汉字.txt", bufErr2.ToString, False, Encoding.UTF8)
        End If

        Return sPath
    End Function

    ''' <summary>
    ''' 导出第一列文字
    ''' </summary>
    ''' <param name="sFile">文件</param>
    ''' <returns>文字文件</returns>
    Public Function ToGb2312WordFile(ByVal sFile As String) As String

        Dim txt As String = My.Computer.FileSystem.ReadAllText(sFile, Encoding.UTF8)
        Dim lines As String() = txt.Split(vbNewLine)
        Dim buf As New StringBuilder
        Dim bufErr As New StringBuilder
        Dim bufErr2 As New StringBuilder
        Dim map As New Hashtable

        For i As Integer = 0 To lines.Length - 1
            Dim line As String = Trim(lines(i).Replace(vbLf, ""))
            If "".Equals(line) Then
                Continue For
            End If
            Dim w As String = line.Split(vbTab)(0)
            Dim py As String = line.Split(vbTab)(1)

            Dim gb As Boolean = True
            For j As Integer = 0 To w.Length - 1
                If Not gb2312_1.Contains(w.Substring(j, 1)) Then
                    gb = False
                End If
            Next

            If gb Then
                buf.AppendLine(line)
            Else
                bufErr.AppendLine(line)
            End If

        Next


        Dim sPath As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & "\\淡定拼音"
        If Not My.Computer.FileSystem.DirectoryExists(sPath) Then
            My.Computer.FileSystem.CreateDirectory(sPath)
        End If
        sPath = sPath & "\\" & Now.ToString("yyyy-MM-dd-HH-mm-ss")
        If Not My.Computer.FileSystem.DirectoryExists(sPath) Then
            My.Computer.FileSystem.CreateDirectory(sPath)
        End If
        Dim sOutFile As String = sPath & "\\" & My.Computer.FileSystem.GetFileInfo(sFile).Name

        My.Computer.FileSystem.WriteAllText(sOutFile & "gb2312.txt", buf.ToString, False, Encoding.UTF8)
        My.Computer.FileSystem.WriteAllText(sOutFile & "big5.txt", bufErr.ToString, False, Encoding.UTF8)

        Return sPath
    End Function

    ''' <summary>
    ''' 导出指定文件中的多音字词条
    ''' 【汉字Tab拼音】
    ''' </summary>
    ''' <param name="sFile">汉字拼音文件</param>
    ''' <returns>目录</returns>
    Public Function ExpDuoyinFile(ByVal sFile As String) As String

        Dim txt As String = My.Computer.FileSystem.ReadAllText(sFile, Encoding.UTF8)
        Dim lines As String() = txt.Split(vbNewLine)
        Dim buf As New StringBuilder
        Dim bufErr As New StringBuilder
        Dim bufErr2 As New StringBuilder
        Dim bufErr3 As New StringBuilder
        Dim bufErr4 As New StringBuilder
        Dim bufErrMtl As New StringBuilder
        Dim bufErrB As New StringBuilder
        Dim cols As String()
        Dim sPys As String

        For i As Integer = 0 To lines.Length - 1
            Dim line As String = Trim(lines(i).Replace(vbLf, ""))
            If "".Equals(line) Then
                Continue For
            End If

            cols = line.Split(vbTab)
            line = line.Replace(",", "，")
            If cols(0).IndexOf("，") > 0 Then
                bufErr4.AppendLine(line)
                Continue For
            End If

            sPys = GetPinyin(cols(0))
            If cols(0).Length <> sPys.Split("'").Length Then
                bufErr2.AppendLine(line & vbTab & GetPinyin(cols(0)))
                bufErr3.AppendLine(line)
                Continue For
            End If

            If sPys.IndexOf(",") > 0 Then
                Dim sMltPy As String = GetMtlPinyin(cols(0))
                If cols.Length > 1 Then
                    If sMltPy.Equals(cols(1)) Then
                        bufErrMtl.AppendLine(line)
                    Else
                        bufErr.AppendLine(line)
                        bufErrB.AppendLine(cols(0) & vbTab & cols(1) & vbTab & sMltPy)
                    End If
                Else
                    bufErr.AppendLine(cols(0) & vbTab)
                    bufErrB.AppendLine(cols(0) & vbTab & vbTab & sMltPy)
                End If
            Else
                If cols.Length > 1 Then
                    If sPys.Equals(cols(1)) Then
                        buf.AppendLine(line)
                    Else
                        bufErr2.AppendLine(line & vbTab & GetPinyin(cols(0)))
                        bufErr3.AppendLine(line)
                    End If
                Else
                    bufErr2.AppendLine(cols(0) & vbTab & vbTab & GetPinyin(cols(0)))
                    bufErr3.AppendLine(cols(0) & vbTab)
                End If
            End If
        Next


        Dim sPath As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & "\\淡定拼音"
        If Not My.Computer.FileSystem.DirectoryExists(sPath) Then
            My.Computer.FileSystem.CreateDirectory(sPath)
        End If
        sPath = sPath & "\\" & Now.ToString("yyyy-MM-dd-HH-mm-ss")
        If Not My.Computer.FileSystem.DirectoryExists(sPath) Then
            My.Computer.FileSystem.CreateDirectory(sPath)
        End If
        Dim sOutFile As String = sPath & "\\" & My.Computer.FileSystem.GetFileInfo(sFile).Name


        If buf.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".无多音字.txt", buf.ToString, False, Encoding.UTF8)
        End If
        If bufErr.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".多音字有误原文.txt", bufErr.ToString, False, Encoding.UTF8)
        End If
        If bufErrB.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".多音字有误对照.txt", bufErrB.ToString, False, Encoding.UTF8)
        End If
        If bufErrMtl.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".多音字正确.txt", bufErrMtl.ToString, False, Encoding.UTF8)
        End If
        If bufErr2.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".拼音有误对照.txt", bufErr2.ToString, False, Encoding.UTF8)
        End If
        If bufErr3.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".拼音有误原文.txt", bufErr3.ToString, False, Encoding.UTF8)
        End If
        If bufErr4.Length > 0 Then
            My.Computer.FileSystem.WriteAllText(sOutFile & ".原文含逗号.txt", bufErr4.ToString, False, Encoding.UTF8)
        End If

        Return sPath
    End Function

    ''' <summary>
    ''' 把文字拼音文件按词序排序后输入
    ''' 【汉字Tab拼音】
    ''' </summary>
    ''' <param name="sFile">文字拼音文件</param>
    ''' <returns>转换后文件</returns>
    Public Function ToSortedPinyinFile(ByVal sFile As String, ByVal appendToDic As Boolean) As String

        Dim txt As String = My.Computer.FileSystem.ReadAllText(sFile, Encoding.UTF8)
        If appendToDic Then
            txt = txt & My.Resources.淡定词库
        End If
        Dim lines As String() = txt.Split(vbNewLine)
        Dim buf As New StringBuilder

        Dim map As New Hashtable
        Dim lst As New List(Of CWord)

        For i As Integer = 0 To lines.Length - 1
            Dim line As String = Trim(lines(i).Replace(vbLf, ""))
            If "".Equals(line) Then
                Continue For
            End If

            Dim cols As String() = line.Split(vbTab)

            ' 忽视错误行、非词的单字行、文字拼音重复行
            If cols.Length < 2 OrElse cols(0).Length < 2 OrElse map.ContainsKey(cols(0) & vbTab & cols(1)) Then
                Continue For
            End If

            ' 拼音以单引号结尾的话，删除掉该单引号
            If cols(1).EndsWith("'") Then
                cols(1) = Strings.Left(cols(1), cols(1).Length - 1)
            End If


            map(cols(0) & vbTab & cols(1)) = 1

            Dim word As New CWord
            word.Text = cols(0)
            word.ShortPinYin = Strings.Join(GetMutilShotPys(cols(1)), "'")
            word.PinYin = cols(1)
            word.Order = GetWordFreqMap()(cols(0))
            lst.Add(word)


            Dim zqPy As String = BreakPys(word.PinYin.Replace("'", ""))
            If zqPy.IndexOf(" ") < 0 AndAlso Not zqPy.Equals(word.PinYin) AndAlso Not map.ContainsKey(cols(0) & vbTab & zqPy) Then
                ' 增强拼音分割
                word = New CWord
                word.Text = cols(0)
                word.ShortPinYin = Strings.Join(GetMutilShotPys(zqPy), "'")
                word.PinYin = zqPy
                word.Order = GetWordFreqMap()(cols(0))
                lst.Add(word)

                map(cols(0) & vbTab & zqPy) = 1
            End If


        Next


        ' 排序 （频率相同时按文字排序，频率不同时按频率排序）
        lst.Sort(Function(w1 As CWord, w2 As CWord)
                     Dim i As Integer = w1.ShortPinYin.CompareTo(w2.ShortPinYin)
                     If Not i = 0 Then
                         Return i
                     End If

                     'i = w1.PinYin.CompareTo(w2.PinYin)
                     'If Not i = 0 Then
                     '    Return i
                     'End If

                     If w1.Order = w2.Order Then
                         Return w1.Text.CompareTo(w2.Text)
                     Else
                         Return w1.Order > w2.Order
                     End If
                 End Function)

        ' 排序输出
        For i As Integer = 0 To lst.Count - 1
            buf.AppendLine(lst(i).Text & vbTab & lst(i).PinYin)
        Next

        Dim ddpyFile As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & "\\淡定词库"
        If Not My.Computer.FileSystem.DirectoryExists(ddpyFile) Then
            My.Computer.FileSystem.CreateDirectory(ddpyFile)
        End If
        ddpyFile = ddpyFile & "\\" & Now.ToString("yyyy-MM-dd-HH-mm-ss")
        If Not My.Computer.FileSystem.DirectoryExists(ddpyFile) Then
            My.Computer.FileSystem.CreateDirectory(ddpyFile)
            ddpyFile = ddpyFile & "\\淡定词库.txt"
        End If

        My.Computer.FileSystem.WriteAllText(ddpyFile, buf.ToString, False, Encoding.UTF8)
        Return ddpyFile
    End Function

    Private Function GetMtlPinyin(ByVal text As String, ByVal idx As Integer) As String

        Dim sTxt As String = text.Substring(idx, 1)
        Dim sTmpL As String = text.Substring(0, idx + 1)
        Dim sTmpR As String = text.Substring(idx)

        If "阿".Equals(sTxt) Then
            sTmpL = text.Substring(0, idx + 1)
            If sTmpL.EndsWith("东阿") Then
                Return "e"
            End If

            If sTmpR.StartsWith("阿胶") OrElse sTmpR.StartsWith("阿房") _
                OrElse sTmpR.StartsWith("阿其所好") _
                OrElse sTmpR.StartsWith("阿附") Then
                Return "e"
            End If

            Return "a"
        End If

        If "南".Equals(sTxt) Then    ' 佛教用语读[na]，其他读[nan]
            If sTmpR.StartsWith("南无") OrElse sTmpR.StartsWith("南無") OrElse sTmpR.StartsWith("南膜") OrElse sTmpR.StartsWith("南牟") _
                OrElse sTmpR.StartsWith("南谟") OrElse sTmpR.StartsWith("南摸") Then
                Return "na"
            End If

            Return "nan"
        End If

        If "无".Equals(sTxt) Then    ' 佛教用语读[mo]，其他读[wu]
            If sTmpR.StartsWith("南无") Then
                Return "mo"
            End If

            Return "wu"
        End If

        If "六".Equals(sTxt) Then
            If sTmpR.StartsWith("六安") Then
                Return "lu"
            End If

            Return "liu"
        End If

        If "吖".Equals(sTxt) Then    ' a 外国语的音译,主要用于有机化学。如:吖嗪、奎吖因
            If sTmpR.StartsWith("吖嗪") OrElse sTmpR.StartsWith("吖啶") Then
                Return "a"
            End If

            If sTmpL.EndsWith("奎吖") AndAlso sTmpR.StartsWith("吖因") Then
                Return "a"
            End If

            Return "ya"
        End If

        If "行".Equals(sTxt) Then    ' 佛教读无行hèng,无造作无动转的意思。如《诸法无行经》

            If sTmpL.EndsWith("人行") AndAlso sTmpR.StartsWith("行道") Then
                Return "xing"
            End If
            If sTmpL.EndsWith("无行") AndAlso sTmpR.StartsWith("行经") Then
                Return "heng"
            End If
            If sTmpL.EndsWith("五行") OrElse sTmpL.EndsWith("本行") Then
                Return "hang"
            End If

            If sTmpR.StartsWith("行业") OrElse sTmpR.StartsWith("行阵") OrElse sTmpR.StartsWith("行列") _
                 OrElse sTmpR.StartsWith("行首") OrElse sTmpR.StartsWith("行计") OrElse sTmpR.StartsWith("行户") _
                 OrElse sTmpR.StartsWith("行铺") OrElse sTmpR.StartsWith("行货") OrElse sTmpR.StartsWith("行第") _
                 OrElse sTmpR.StartsWith("行次") OrElse sTmpR.StartsWith("行几") OrElse sTmpR.StartsWith("行二") _
                 OrElse sTmpR.StartsWith("行棉袄") OrElse sTmpR.StartsWith("行棉被") OrElse sTmpR.StartsWith("行话") _
                 OrElse sTmpR.StartsWith("行辈") OrElse sTmpR.StartsWith("行当") OrElse sTmpR.StartsWith("行道") _
                 OrElse sTmpR.StartsWith("行行出状元") OrElse sTmpR.StartsWith("行出状元") OrElse sTmpR.StartsWith("行家") _
                 OrElse sTmpR.StartsWith("行会") OrElse sTmpR.StartsWith("行规") OrElse sTmpR.StartsWith("行距") _
                 OrElse sTmpR.StartsWith("行情") OrElse sTmpR.StartsWith("行伍") OrElse sTmpR.StartsWith("行子") _
                 OrElse sTmpR.StartsWith("行间") OrElse sTmpR.StartsWith("行伍") OrElse sTmpR.StartsWith("行长") _
            Then
                Return "hang"
            End If

            If sTmpL.EndsWith("排行") OrElse sTmpL.EndsWith("银行") OrElse sTmpL.EndsWith("商行") _
                 OrElse sTmpL.EndsWith("分行") OrElse sTmpL.EndsWith("招行") OrElse sTmpL.EndsWith("中行") _
                 OrElse sTmpL.EndsWith("农行") OrElse sTmpL.EndsWith("工行") OrElse sTmpL.EndsWith("央行") _
                 OrElse sTmpL.EndsWith("洋行") OrElse sTmpL.EndsWith("建行") OrElse sTmpL.EndsWith("交行") _
                 OrElse sTmpL.EndsWith("道行") OrElse sTmpL.EndsWith("招行") OrElse sTmpL.EndsWith("中行") _
                 OrElse sTmpL.EndsWith("转行") OrElse sTmpL.EndsWith("整行") OrElse sTmpL.EndsWith("折行") _
                 OrElse sTmpL.EndsWith("排行") OrElse sTmpL.EndsWith("人行") OrElse sTmpL.EndsWith("在行") _
                 OrElse sTmpL.EndsWith("庄行") _
            Then
                Return "hang"
            End If

            Return "xing"
        End If


        If "的".Equals(sTxt) Then
            If sTmpR.StartsWith("的确") OrElse sTmpR.StartsWith("的确良") OrElse sTmpR.StartsWith("的士") Then
                Return "di"
            End If
            If sTmpL.EndsWith("目的") OrElse sTmpR.EndsWith("众矢之的") OrElse sTmpR.EndsWith("打的") Then
                Return "di"
            End If

            If (sTmpL.EndsWith("有的") AndAlso sTmpR.StartsWith("的放矢")) OrElse _
                (sTmpL.EndsWith("的的") AndAlso sTmpR.StartsWith("的确确")) Then
                Return "di"
            End If

            Return "de"
        End If

        If "大".Equals(sTxt) Then
            If sTmpR.StartsWith("大夫") OrElse sTmpR.StartsWith("大王") OrElse sTmpR.StartsWith("大黄") Then
                Return "dai"
            End If

            Return "da"
        End If

        If "派".Equals(sTxt) Then
            If sTmpR.StartsWith("派司") AndAlso sTmpR.EndsWith("派司") Then
                Return "pa"
            End If

            Return "pai"
        End If

        If "会".Equals(sTxt) Then
            If sTmpR.StartsWith("会计") OrElse sTmpR.StartsWith("会弁") Then
                Return "kuai"
            End If
            If sTmpL.EndsWith("财会") Then
                Return "kuai"
            End If

            Return "hui"
        End If

        If "读".Equals(sTxt) Then
            If sTmpR.StartsWith("句读") AndAlso sTmpR.EndsWith("读之不知") Then
                Return "dou"
            End If

            Return "du"
        End If

        If "地".Equals(sTxt) Then
            If sTmpL.EndsWith("认真地") OrElse sTmpL.EndsWith("渐渐地") OrElse sTmpL.EndsWith("有计划地") Then
                Return "de"
            End If

            Return "di"
        End If

        If "和".Equals(sTxt) Then
            If sTmpL.EndsWith("揉和") OrElse sTmpL.EndsWith("拌和") OrElse sTmpL.EndsWith("搀和") _
               OrElse sTmpL.EndsWith("搅和") OrElse sTmpL.EndsWith("暖和") Then
                Return "huo"
            End If

            If text.Equals("和药") OrElse text.Equals("热和") OrElse text.Equals("和羹") OrElse _
                text.Equals("和泥儿") OrElse text.Equals("和泥巴") OrElse text.Equals("软和") Then
                Return "huo"
            End If

            If text.Equals("和了") OrElse text.Equals("我和了") OrElse text.Equals("他和了") OrElse _
                text.Equals("你和了") Then
                Return "hu"
            End If

            Return "he"
        End If

        If "了".Equals(sTxt) Then
            If sTmpL.EndsWith("聪了") OrElse sTmpL.EndsWith("不了") OrElse sTmpL.EndsWith("不了了") OrElse sTmpL.EndsWith("明了") Then
                Return "liao"
            End If
            If sTmpR.StartsWith("了不") OrElse sTmpR.StartsWith("了结") OrElse sTmpR.StartsWith("了得") _
                OrElse sTmpR.StartsWith("了如指掌") OrElse sTmpR.StartsWith("了解") OrElse sTmpR.StartsWith("了断") _
                OrElse sTmpR.StartsWith("了却") OrElse sTmpR.StartsWith("了然") OrElse sTmpR.StartsWith("了断") _
            Then
                Return "liao"
            End If

            If text.Equals("了法") OrElse text.Equals("了悟") OrElse text.Equals("了断") _
                OrElse text.Equals("了利") OrElse text.Equals("了无恐色") OrElse text.Equals("了局") _
                OrElse text.Equals("了还") OrElse text.Equals("了辩") OrElse text.Equals("了休") _
                OrElse text.Equals("了劣") OrElse text.Equals("了账") _
            Then
                Return "liao"
            End If

            Return "le"
        End If

        If "员".Equals(sTxt) Then        ' yun 姓、名
            If sTmpR.StartsWith("员于尔辐") Then
                Return "yun"
            End If

            Return "yuan"
        End If

        If "其".Equals(sTxt) Then
            If sTmpL.EndsWith("庶子其") OrElse sTmpL.EndsWith("郦食其") Then
                Return "ji"
            End If

            Return "qi"
        End If

        If "内".Equals(sTxt) Then
            If sTmpL.EndsWith("无不务内") OrElse sTmpR.StartsWith("内诸侯") OrElse sTmpR.StartsWith("内和声") Then
                Return "na"
            End If
            If sTmpL.EndsWith("不内") AndAlso sTmpR.Equals("内") Then
                Return "na"
            End If

            Return "nei"
        End If

        If "系".Equals(sTxt) Then
            If sTmpL.EndsWith("带系") OrElse sTmpL.EndsWith("不系") Then
                Return "ji"
            End If
            If sTmpR.StartsWith("系带") OrElse sTmpR.StartsWith("系鞋带") OrElse sTmpR.StartsWith("系缆") OrElse _
               sTmpR.StartsWith("系腰") OrElse sTmpR.StartsWith("系人情思") OrElse sTmpR.StartsWith("系泊") OrElse _
               sTmpR.StartsWith("系绳") Then
                Return "ji"
            End If

            If text.Equals("无故系狱") OrElse text.Equals("愚士系俗兮") OrElse text.Equals("系留") _
                OrElse text.Equals("系留塔") Then
                Return "ji"
            End If

            Return "xi"
        End If

        If "育".Equals(sTxt) Then
            If text.Equals("杭育") Then
                Return "yo"
            End If

            Return "yu"
        End If

        If "数".Equals(sTxt) Then
            If sTmpR.StartsWith("数见不鲜") Then
                Return "shuo"
            End If

            Return "shu"
        End If

        If "单".Equals(sTxt) Then
            If text.Equals("单于") Then
                Return "chan"
            End If

            If text.Equals("单县") OrElse text.Equals("单豹") Then
                Return "shan"
            End If

            Return "dan"
        End If

        If "术".Equals(sTxt) Then
            If sTmpL.EndsWith("白术") OrElse sTmpL.EndsWith("苍术") OrElse sTmpL.EndsWith("茅术") Then
                Return "zhu"
            End If

            Return "shu"
        End If

        If "区".Equals(sTxt) Then
            If sTmpL.EndsWith("姓区") OrElse sTmpR.StartsWith("区氏") Then
                Return "ou"
            End If

            Return "qu"
        End If

        If "给".Equals(sTxt) Then
            If sTmpL.EndsWith("供给") OrElse sTmpL.EndsWith("自给") OrElse sTmpL.EndsWith("家给") OrElse _
               sTmpL.EndsWith("记给") OrElse sTmpL.EndsWith("补给") OrElse sTmpL.EndsWith("补给") Then
                Return "ji"
            End If
            If sTmpR.StartsWith("给捷") OrElse sTmpR.StartsWith("给馈饷") OrElse sTmpR.StartsWith("给养") _
                OrElse sTmpR.StartsWith("给其食用") OrElse sTmpR.StartsWith("给付") OrElse sTmpR.StartsWith("给事中") _
                OrElse sTmpR.StartsWith("给予") Then
                Return "ji"
            End If
            If text.Equals("壮必给老") Then
                Return "ji"
            End If

            Return "gei"
        End If

        If "种".Equals(sTxt) Then
            If text.Equals("种，稚也") OrElse text.Equals("种,稚也") Then
                Return "chong"
            End If

            Return "zhong"
        End If

        If "万".Equals(sTxt) Then
            If sTmpR.StartsWith("万俟") Then
                Return "mo"
            End If

            Return "wan"
        End If

        If "呢".Equals(sTxt) Then
            If sTmpR.StartsWith("呢喃") OrElse sTmpL.EndsWith("呢呢") OrElse sTmpR.StartsWith("呢羽") _
                OrElse sTmpR.StartsWith("呢绒") OrElse sTmpR.StartsWith("呢子") Then
                Return "ni"
            End If

            Return "ne"
        End If

        If "思".Equals(sTxt) Then
            If text.Equals("则思思者如故矣") OrElse text.Equals("于思") Then
                Return "sai"
            End If

            Return "si"
        End If

        If "称".Equals(sTxt) Then
            If sTmpR.StartsWith("称身") OrElse sTmpR.StartsWith("称体裁衣") OrElse sTmpR.StartsWith("称心") _
                OrElse sTmpR.StartsWith("称愿") OrElse sTmpR.StartsWith("称职") _
                OrElse sTmpR.StartsWith("称合") OrElse sTmpR.StartsWith("称任") OrElse sTmpR.StartsWith("称位") Then
                Return "chen"
            End If
            If sTmpL.EndsWith("对称") OrElse sTmpR.StartsWith("相称") Then
                Return "chen"
            End If

            Return "cheng"
        End If

        If "见".Equals(sTxt) Then
            If text.Equals("见龙在田") OrElse text.Equals("情见力屈") OrElse text.Equals("图穷而匕首见") _
                OrElse text.Equals("有虹见于玉堂") OrElse text.Equals("有时见日") Then
                Return "xian"
            End If

            Return "jian"
        End If

        If "革".Equals(sTxt) Then
            If sTmpL.EndsWith("病革") Then
                Return "ji"
            End If

            Return "ge"
        End If

        If "识".Equals(sTxt) Then
            If sTmpL.EndsWith("博闻强识") OrElse sTmpL.EndsWith("默而识") OrElse sTmpR.StartsWith("识念") Then
                Return "zhi"
            End If

            Return "shi"
        End If

        If "络".Equals(sTxt) Then
            If sTmpL.EndsWith("络子") Then
                Return "lao"
            End If

            Return "luo"
        End If

        If "责".Equals(sTxt) Then
            If text.Equals("听称责以傅别") OrElse text.Equals("薄敛已责") OrElse text.Equals("使无券契之责") Then    ' 债
                Return "zhai"
            End If

            Return "ze"
        End If

        If "这".Equals(sTxt) Then
            ' 口音 zhei

            Return "zhe"
        End If

        If "色".Equals(sTxt) Then
            If sTmpL.EndsWith("色子") Then
                Return "shai"
            End If

            Return "se"
        End If

        If "价".Equals(sTxt) Then
            If sTmpL.EndsWith("甭价") OrElse sTmpL.EndsWith("不价") OrElse sTmpL.EndsWith("别价") Then
                Return "jie"
            End If
            If sTmpR.StartsWith("价人") OrElse sTmpR.StartsWith("价藩") OrElse sTmpR.StartsWith("价傧") _
               OrElse sTmpR.StartsWith("价妇") OrElse sTmpR.StartsWith("价响") Then
                Return "jie"
            End If

            Return "jia"
        End If

        If "归".Equals(sTxt) Then
            If sTmpR.StartsWith("归示") OrElse sTmpR.StartsWith("归赈") OrElse sTmpR.StartsWith("归色") Then
                Return "kui"
            End If

            Return "gui"
        End If

        If "家".Equals(sTxt) Then
            If sTmpL.EndsWith("阿家") Then
                Return "gu"
            End If
            If sTmpL.EndsWith("成年家") OrElse sTmpL.EndsWith("整天家") Then
                Return "jie"
            End If

            Return "jia"
        End If

        If "说".Equals(sTxt) Then
            If sTmpL.EndsWith("游说") OrElse sTmpL.EndsWith("劝说") Then
                Return "shui"
            End If
            If sTmpR.StartsWith("说士") Then
                Return "shui"
            End If
            If text.Equals("说士") OrElse text.Equals("说客") OrElse text.Equals("说难") _
               OrElse text.Equals("说城") OrElse text.Equals("说导") OrElse text.Equals("说辞") _
               OrElse text.Equals("说谏") OrElse text.Equals("说调") OrElse text.Equals("说客") _
               OrElse text.Equals("说服") _
               Then
                Return "shui"
            End If
            If text.Equals("舆说辐") OrElse text.Equals("岂其伐人而说甲执冰以游") OrElse text.Equals("说履") _
               OrElse text.Equals("皆说然息") _
               Then
                Return "tuo"
            End If
            If text.Equals("乃徐有说") OrElse text.Equals("我心则说") OrElse text.Equals("说怿女美") _
               OrElse text.Equals("宣王说之") OrElse text.Equals("公输盘不说") OrElse text.Equals("不亦说乎") _
               Then
                Return "yue"
            End If

            Return "shuo"
        End If

        If "都".Equals(sTxt) Then
            If sTmpL.EndsWith("首都") OrElse sTmpL.EndsWith("国都") Then
                Return "du"
            End If
            If sTmpR.StartsWith("都市") OrElse sTmpR.StartsWith("都卿相") OrElse sTmpR.StartsWith("都察院") Then
                Return "du"
            End If
            If sTmpL.EndsWith("为都") AndAlso sTmpR.Equals("都") Then
                Return "du"
            End If
            If text.Equals("通都大邑") OrElse text.Equals("国都") OrElse text.Equals("京都") _
               OrElse text.Equals("建都") OrElse text.Equals("甚都") OrElse text.Equals("都丽") _
               OrElse text.Equals("都雅") OrElse text.Equals("都尉") OrElse text.Equals("都御使") _
               OrElse text.Equals("都尉") OrElse text.Equals("都统") OrElse text.Equals("都司") _
               OrElse text.Equals("都试") OrElse text.Equals("都护") OrElse text.Equals("都督") _
               Then
                Return "du"
            End If

            Return "dou"
        End If

        If "度".Equals(sTxt) Then
            If sTmpL.EndsWith("忖度") OrElse sTmpL.EndsWith("揣度") OrElse sTmpL.EndsWith("不度") Then
                Return "duo"
            End If
            If sTmpR.StartsWith("度势") OrElse sTmpR.StartsWith("度德") OrElse sTmpR.StartsWith("度地") _
               OrElse sTmpR.StartsWith("度其") OrElse sTmpR.StartsWith("度长") _
                Then
                Return "duo"
            End If

            Return "du"
        End If

        If "车".Equals(sTxt) Then
            If text.Equals("舍车保帅") Then
                Return "ju"
            End If

            Return "che"
        End If

        If "合".Equals(sTxt) Then
            ' ge 旧时量粮食的器具，容量为一合

            Return "he"
        End If

        If "什".Equals(sTxt) Then
            If sTmpR.StartsWith("什么") Then
                Return "shen"
            End If

            Return "shi"
        End If

        If "戏".Equals(sTxt) Then
            If sTmpR.StartsWith("戏戟") OrElse sTmpR.StartsWith("戏竹") Then
                Return "hui"
            End If
            If text.Equals("於戏") Then
                Return "hu"
            End If

            Return "xi"
        End If

        If "广".Equals(sTxt) Then
            ' an 人名

            Return "guang"
        End If

        If "核".Equals(sTxt) Then
            ' hu 口语

            Return "he"
        End If

        If "划".Equals(sTxt) Then
            If text.Equals("佰划") Then
                Return "huai"
            End If

            Return "hua"
        End If

        If "提".Equals(sTxt) Then
            If sTmpR.StartsWith("提防") OrElse sTmpR.StartsWith("提溜") Then
                Return "di"
            End If

            Return "ti"
        End If

        If "强".Equals(sTxt) Then
            If sTmpL.EndsWith("倔强") OrElse sTmpR.StartsWith("强嘴") Then
                Return "jiang"
            End If

            Return "qiang"
        End If

        If "参".Equals(sTxt) Then
            If sTmpL.EndsWith("人参") OrElse sTmpL.EndsWith("党参") OrElse sTmpL.EndsWith("红参") _
               OrElse sTmpL.EndsWith("长白参") OrElse sTmpL.EndsWith("高丽参") OrElse sTmpL.EndsWith("花旗参") _
               OrElse sTmpL.EndsWith("玄参") OrElse sTmpL.EndsWith("丹参") OrElse sTmpL.EndsWith("的参") _
               OrElse sTmpL.EndsWith("野山参") OrElse sTmpL.EndsWith("园参") OrElse sTmpL.EndsWith("血参") _
               OrElse sTmpL.EndsWith("黄参") OrElse sTmpL.EndsWith("林下参") OrElse sTmpL.EndsWith("生晒参") _
               OrElse sTmpL.EndsWith("生晒山参") OrElse sTmpL.EndsWith("活性参") OrElse sTmpL.EndsWith("保鲜参") _
               OrElse sTmpL.EndsWith("糖参") OrElse sTmpL.EndsWith("大力参") OrElse sTmpL.EndsWith("水参") _
               OrElse sTmpL.EndsWith("皮尾参") OrElse sTmpL.EndsWith("掐皮参") OrElse sTmpL.EndsWith("白干参") _
               OrElse sTmpL.EndsWith("工艺参") OrElse sTmpL.EndsWith("别直参") OrElse sTmpL.EndsWith("西洋参") _
               OrElse sTmpL.EndsWith("元参") OrElse sTmpL.EndsWith("黑参") OrElse sTmpL.EndsWith("克参") _
               OrElse sTmpL.EndsWith("狗参") OrElse sTmpL.EndsWith("阳参") OrElse sTmpL.EndsWith("煤参") _
               OrElse sTmpL.EndsWith("海参") OrElse sTmpL.EndsWith("方参") OrElse sTmpL.EndsWith("刺参") _
               OrElse sTmpL.EndsWith("沙参") OrElse sTmpL.EndsWith("方参") OrElse sTmpL.EndsWith("刺参") _
            Then
                Return "shen"
            End If
            If sTmpR.StartsWith("参头") OrElse sTmpR.StartsWith("参须") OrElse sTmpR.StartsWith("参的") _
               OrElse sTmpR.StartsWith("参片") OrElse sTmpR.StartsWith("参星") OrElse sTmpR.StartsWith("参酒") _
               OrElse sTmpR.StartsWith("参粉") _
            Then
                Return "shen"
            End If
            If sTmpR.StartsWith("参天两地") OrElse sTmpR.StartsWith("参分") OrElse sTmpR.StartsWith("参日") _
               OrElse sTmpR.StartsWith("参省") _
            Then
                Return "san"
            End If

            Return "can"
        End If

        If "重".Equals(sTxt) Then
            If sTmpL.EndsWith("双重") OrElse sTmpL.EndsWith("一重") OrElse sTmpL.EndsWith("盾重") _
               OrElse sTmpL.EndsWith("盾重重") OrElse sTmpL.EndsWith("烦恼重重") OrElse sTmpL.EndsWith("烦恼重") _
               OrElse sTmpL.EndsWith("二重") OrElse sTmpL.EndsWith("三重") OrElse sTmpL.EndsWith("九重") _
               OrElse sTmpL.EndsWith("心事重重") OrElse sTmpL.EndsWith("心事重") OrElse sTmpL.EndsWith("多重性") _
               OrElse sTmpL.EndsWith("两重") OrElse sTmpL.EndsWith("心事重") OrElse sTmpL.EndsWith("山重") _
               OrElse sTmpL.EndsWith("两重") OrElse sTmpL.EndsWith("心事重") OrElse sTmpL.EndsWith("山重") _
           Then
                Return "chong"
            End If
            If sTmpR.StartsWith("重复") OrElse sTmpR.StartsWith("重申") OrElse sTmpR.StartsWith("重庆") _
               OrElse sTmpR.StartsWith("重版") OrElse sTmpR.StartsWith("重沓") OrElse sTmpR.StartsWith("重阳") _
               OrElse sTmpR.StartsWith("重逢") OrElse sTmpR.StartsWith("重叠") OrElse sTmpR.StartsWith("重霄") _
               OrElse sTmpR.StartsWith("重洋") OrElse sTmpR.StartsWith("重唱") OrElse sTmpR.StartsWith("重峦叠嶂") _
               OrElse sTmpR.StartsWith("重屋") OrElse sTmpR.StartsWith("重山") OrElse sTmpR.StartsWith("重世") _
               OrElse sTmpR.StartsWith("重现") OrElse sTmpR.StartsWith("重句") OrElse sTmpR.StartsWith("重字") _
               OrElse sTmpR.StartsWith("重卦") OrElse sTmpR.StartsWith("重席") OrElse sTmpR.StartsWith("重轩") _
               OrElse sTmpR.StartsWith("重瞳") OrElse sTmpR.StartsWith("重围") OrElse sTmpR.StartsWith("重楼") _
               OrElse sTmpR.StartsWith("重铠") OrElse sTmpR.StartsWith("重听") OrElse sTmpR.StartsWith("重视") _
               OrElse sTmpR.StartsWith("重堂") OrElse sTmpR.StartsWith("重渊") OrElse sTmpR.StartsWith("重基") _
               OrElse sTmpR.StartsWith("重孙") OrElse sTmpR.StartsWith("重新") OrElse sTmpR.StartsWith("重修") _
               OrElse sTmpR.StartsWith("重改") OrElse sTmpR.StartsWith("重来") OrElse sTmpR.StartsWith("重逢") _
               OrElse sTmpR.StartsWith("重行") OrElse sTmpR.StartsWith("重科") OrElse sTmpL.EndsWith("数重") _
               OrElse sTmpR.StartsWith("重屋") OrElse sTmpR.StartsWith("重身") OrElse sTmpR.StartsWith("重马") _
               OrElse sTmpR.StartsWith("重版") OrElse sTmpR.StartsWith("重播") OrElse sTmpR.StartsWith("重唱") _
               OrElse sTmpR.StartsWith("重围") OrElse sTmpR.StartsWith("重重围") OrElse sTmpR.StartsWith("重出") _
               OrElse sTmpR.StartsWith("重蹈") OrElse sTmpR.StartsWith("重叠") OrElse sTmpR.StartsWith("重返") _
               OrElse sTmpR.StartsWith("重影") OrElse sTmpR.StartsWith("重根") OrElse sTmpR.StartsWith("重挂") _
               OrElse sTmpR.StartsWith("重光") OrElse sTmpR.StartsWith("重合") OrElse sTmpR.StartsWith("重婚") _
               OrElse sTmpR.StartsWith("重建") OrElse sTmpR.StartsWith("重见") OrElse sTmpR.StartsWith("重聚") _
               OrElse sTmpR.StartsWith("重拍") OrElse sTmpR.StartsWith("重起") OrElse sTmpR.StartsWith("重申") _
               OrElse sTmpR.StartsWith("重审") OrElse sTmpR.StartsWith("重生") OrElse sTmpR.StartsWith("重适") _
               OrElse sTmpR.StartsWith("重施") OrElse sTmpR.StartsWith("重述") OrElse sTmpR.StartsWith("重算") _
               OrElse sTmpR.StartsWith("重弹") OrElse sTmpR.StartsWith("重提") OrElse sTmpR.StartsWith("重温") _
               OrElse sTmpR.StartsWith("重文") OrElse sTmpR.StartsWith("重午") OrElse sTmpR.StartsWith("重霄") _
               OrElse sTmpR.StartsWith("重演") OrElse sTmpR.StartsWith("重眼") OrElse sTmpR.StartsWith("重足") _
               OrElse sTmpR.StartsWith("重译") OrElse sTmpR.StartsWith("重印") OrElse sTmpR.StartsWith("重映") _
               OrElse sTmpR.StartsWith("重奏") OrElse sTmpR.StartsWith("重搞") OrElse sTmpR.StartsWith("重说") _
               OrElse sTmpR.StartsWith("重发") OrElse sTmpR.StartsWith("重打") OrElse sTmpR.StartsWith("重登") _
               OrElse sTmpR.StartsWith("重获") OrElse sTmpR.StartsWith("重拍") OrElse sTmpR.StartsWith("重设") _
               OrElse sTmpR.StartsWith("重考") OrElse sTmpR.StartsWith("重楼") OrElse sTmpR.StartsWith("重启") _
               OrElse sTmpR.StartsWith("重选") OrElse sTmpR.StartsWith("重拨") OrElse sTmpR.StartsWith("重排") _
               OrElse sTmpR.StartsWith("重天") OrElse sTmpR.StartsWith("重游") OrElse sTmpR.StartsWith("重码") _
               OrElse sTmpR.StartsWith("重重叠") OrElse sTmpR.StartsWith("重组") OrElse sTmpR.StartsWith("重振") _
               OrElse sTmpR.StartsWith("重整") OrElse sTmpR.StartsWith("重操") OrElse sTmpR.StartsWith("重圆") _
               OrElse sTmpR.StartsWith("重学") OrElse sTmpR.StartsWith("重载") OrElse sTmpR.StartsWith("重归") _
               OrElse sTmpR.StartsWith("重洋") OrElse sTmpR.StartsWith("重教") OrElse sTmpR.StartsWith("重门") _
               OrElse sTmpR.StartsWith("重订") OrElse sTmpR.StartsWith("重言") OrElse sTmpR.StartsWith("重遇") _
               OrElse sTmpR.StartsWith("重张") OrElse sTmpR.StartsWith("重发") OrElse sTmpR.StartsWith("重瞳") _
               OrElse sTmpR.StartsWith("重坎") OrElse sTmpR.StartsWith("重练") OrElse sTmpR.StartsWith("重议") _
               OrElse sTmpR.StartsWith("重刻") OrElse sTmpR.StartsWith("重估") OrElse sTmpR.StartsWith("重岩") _
               OrElse sTmpR.StartsWith("重称") OrElse sTmpR.StartsWith("重采") OrElse sTmpR.StartsWith("重列") _
               OrElse sTmpR.StartsWith("重写") OrElse sTmpR.StartsWith("重求") OrElse sTmpR.StartsWith("重茧") _
               OrElse sTmpR.StartsWith("重会") OrElse sTmpR.StartsWith("重头") OrElse sTmpR.StartsWith("重戴") _
               OrElse sTmpR.StartsWith("重酿") OrElse sTmpR.StartsWith("重户") OrElse sTmpR.StartsWith("重月") _
               OrElse sTmpR.StartsWith("重裘") OrElse sTmpR.StartsWith("重床") OrElse sTmpR.StartsWith("重至") _
               OrElse sTmpR.StartsWith("重张") OrElse sTmpR.StartsWith("重磨") OrElse sTmpR.StartsWith("重茧") _
               OrElse sTmpR.StartsWith("重架") _
            Then
                Return "chong"
            End If

            Return "zhong"
        End If

        If "解".Equals(sTxt) Then
            If sTmpL.EndsWith("卖解") Then
                Return "xie"
            End If
            If sTmpR.StartsWith("解舍") OrElse sTmpR.StartsWith("解垢") OrElse sTmpR.StartsWith("解弛") _
               OrElse sTmpR.StartsWith("解休") OrElse sTmpR.StartsWith("解怠") OrElse sTmpR.StartsWith("解趣") _
               OrElse sTmpR.StartsWith("解数") _
            Then
                Return "xie"
            End If

            Return "jie"
        End If

        If "模".Equals(sTxt) Then
            If sTmpL.EndsWith("铸模") OrElse sTmpL.EndsWith("字模") OrElse sTmpL.EndsWith("铜模") OrElse sTmpL.EndsWith("阴模") Then
                Return "mu"
            End If
            If sTmpR.StartsWith("模板") OrElse sTmpR.StartsWith("模具") OrElse sTmpR.StartsWith("模样") _
               OrElse sTmpR.StartsWith("模子") OrElse sTmpR.StartsWith("模型") _
            Then
                Return "mu"
            End If

            Return "mo"
        End If

        If "将".Equals(sTxt) Then
            If sTmpR.StartsWith("将子无怒") Then
                Return "qiang"
            End If

            Return "jiang"
        End If
        If "免".Equals(sTxt) Then
            If sTmpR.StartsWith("免袒") Then
                Return "wen"
            End If

            Return "mian"
        End If
        If "得".Equals(sTxt) Then
            If sTmpR.StartsWith("得亏") Then
                Return "dei"
            End If

            Return "de"
        End If

        If "约".Equals(sTxt) Then
            ' yao 用秤称物的口语

            Return "yue"
        End If

        If "没".Equals(sTxt) Then
            If sTmpL.EndsWith("沉没") OrElse sTmpL.EndsWith("淹没") OrElse sTmpL.EndsWith("埋没") _
                Then
                Return "mo"
            End If
            If sTmpR.StartsWith("没齿") OrElse sTmpR.StartsWith("没落") OrElse sTmpR.StartsWith("没奈何") _
               OrElse sTmpR.StartsWith("没胫") OrElse sTmpR.StartsWith("没不煞") OrElse sTmpR.StartsWith("没顶之灾") _
            Then
                Return "mo"
            End If
            If text.Equals("没收") OrElse text.Equals("没药") Then
                Return "mo"
            End If

            Return "mei"
        End If

        If "般".Equals(sTxt) Then
            If sTmpL.EndsWith("一般") Then
                Return "ban"
            End If
            If sTmpR.StartsWith("般若") Then
                Return "bo"
            End If
            If sTmpR.StartsWith("般逸") OrElse sTmpR.StartsWith("般游") OrElse sTmpR.StartsWith("般缠") _
               OrElse sTmpR.StartsWith("般乐") _
            Then
                Return "pan"
            End If

            Return "ban"
        End If

        If "角".Equals(sTxt) Then
            If sTmpL.EndsWith("丑角") OrElse sTmpL.EndsWith("旦角") OrElse sTmpL.EndsWith("坤角") _
               OrElse sTmpL.EndsWith("名角") OrElse sTmpL.EndsWith("男角") OrElse sTmpL.EndsWith("女角") _
            Then
                Return "jue"
            End If
            If sTmpR.StartsWith("角力") OrElse sTmpR.StartsWith("角斗") OrElse sTmpR.StartsWith("角逐") _
               OrElse sTmpR.StartsWith("角色") OrElse sTmpR.StartsWith("红角") OrElse sTmpR.StartsWith("名角") _
               OrElse sTmpR.StartsWith("角试") OrElse sTmpR.StartsWith("角斗") OrElse sTmpR.StartsWith("角之") _
               OrElse sTmpR.StartsWith("角抵") _
            Then
                Return "jue"
            End If

            Return "jiao"
        End If

        If "埋".Equals(sTxt) Then
            If sTmpR.StartsWith("埋怨") OrElse sTmpR.StartsWith("埋三怨四") Then
                Return "man"
            End If

            Return "mai"
        End If

        If "亲".Equals(sTxt) Then
            If sTmpR.StartsWith("亲家") Then
                Return "qing"
            End If

            Return "qin"
        End If

        If "传".Equals(sTxt) Then
            If sTmpL.EndsWith("立传") OrElse sTmpL.EndsWith("作传") OrElse sTmpL.EndsWith("略传") _
               OrElse sTmpL.EndsWith("纪传") OrElse sTmpL.EndsWith("自传") OrElse sTmpL.EndsWith("正传") _
               OrElse sTmpL.EndsWith("杂传") OrElse sTmpL.EndsWith("左传") OrElse sTmpL.EndsWith("志传") _
            Then
                Return "zhuan"
            End If

            If sTmpR.StartsWith("传记") OrElse sTmpR.StartsWith("传注") OrElse sTmpR.StartsWith("传诂") _
               OrElse sTmpR.StartsWith("传疏") OrElse sTmpR.StartsWith("传笺") OrElse sTmpR.StartsWith("传诂") _
               OrElse sTmpR.StartsWith("传略") OrElse sTmpR.StartsWith("传赞") _
            Then
                Return "zhuan"
            End If

            Return "chuan"
        End If

        If "券".Equals(sTxt) Then
            If sTmpL.EndsWith("拱券") Then
                Return "xuan"
            End If

            If sTmpR.StartsWith("券门") Then
                Return "xuan"
            End If

            Return "quan"
        End If

        If "率".Equals(sTxt) Then
            If sTmpL.EndsWith("表率") OrElse sTmpL.EndsWith("将率") OrElse sTmpL.EndsWith("在率") _
               OrElse sTmpL.EndsWith("别率") OrElse sTmpL.EndsWith("为率") OrElse sTmpL.EndsWith("悉率") _
               OrElse sTmpL.EndsWith("身率") OrElse sTmpL.EndsWith("统率") OrElse sTmpL.EndsWith("不率") _
               OrElse sTmpL.EndsWith("敢率") OrElse sTmpL.EndsWith("时率") OrElse sTmpL.EndsWith("抵率") _
               OrElse sTmpL.EndsWith("草率") OrElse sTmpL.EndsWith("轻率") OrElse sTmpL.EndsWith("路率") _
               OrElse sTmpL.EndsWith("粗率") OrElse sTmpL.EndsWith("坦率") OrElse sTmpL.EndsWith("直率") _
               OrElse sTmpL.EndsWith("语率") OrElse sTmpL.EndsWith("真率") OrElse sTmpL.EndsWith("悉率") _
            Then
                Return "shuai"
            End If

            If sTmpR.StartsWith("率下") OrElse sTmpR.StartsWith("率示") OrElse sTmpR.StartsWith("率物") _
               OrElse sTmpR.StartsWith("率身") OrElse sTmpR.StartsWith("率时") OrElse sTmpR.StartsWith("率众") _
               OrElse sTmpR.StartsWith("率导") OrElse sTmpR.StartsWith("率师") OrElse sTmpR.StartsWith("率众") _
               OrElse sTmpR.StartsWith("率长") OrElse sTmpR.StartsWith("率正") OrElse sTmpR.StartsWith("率募") _
               OrElse sTmpR.StartsWith("率敛") OrElse sTmpR.StartsWith("率钱") OrElse sTmpR.StartsWith("率财") _
               OrElse sTmpR.StartsWith("率领") OrElse sTmpR.StartsWith("率俾") OrElse sTmpR.StartsWith("率将") _
               OrElse sTmpR.StartsWith("率勒") OrElse sTmpR.StartsWith("率厉") OrElse sTmpR.StartsWith("率御") _
               OrElse sTmpR.StartsWith("率导") OrElse sTmpR.StartsWith("率道") OrElse sTmpR.StartsWith("率义") _
               OrElse sTmpR.StartsWith("率由旧章") OrElse sTmpR.StartsWith("率勉") OrElse sTmpR.StartsWith("率厉") _
               OrElse sTmpR.StartsWith("率民") OrElse sTmpR.StartsWith("率俗") OrElse sTmpR.StartsWith("率从") _
               OrElse sTmpR.StartsWith("率由群匹") OrElse sTmpR.StartsWith("率教") OrElse sTmpR.StartsWith("率履") _
               OrElse sTmpR.StartsWith("率法") OrElse sTmpR.StartsWith("率西") OrElse sTmpR.StartsWith("率口") _
               OrElse sTmpR.StartsWith("率心") OrElse sTmpR.StartsWith("率任") OrElse sTmpR.StartsWith("率情") _
               OrElse sTmpR.StartsWith("率服") OrElse sTmpR.StartsWith("率化") OrElse sTmpR.StartsWith("率尔") _
               OrElse sTmpR.StartsWith("率笔") OrElse sTmpR.StartsWith("率悟") OrElse sTmpR.StartsWith("率健") _
               OrElse sTmpR.StartsWith("率意") OrElse sTmpR.StartsWith("率达") OrElse sTmpR.StartsWith("率躁") _
               OrElse sTmpR.StartsWith("率赂") OrElse sTmpR.StartsWith("率天") OrElse sTmpR.StartsWith("率土") _
               OrElse sTmpR.StartsWith("率同") OrElse sTmpR.StartsWith("率皆") OrElse sTmpR.StartsWith("率多侈纵") _
               OrElse sTmpR.StartsWith("率初") OrElse sTmpR.StartsWith("率幸") OrElse sTmpR.StartsWith("率常如此") _
               OrElse sTmpR.StartsWith("率马以骥") OrElse sTmpR.StartsWith("率然以答") OrElse sTmpR.StartsWith("率先") _
               OrElse sTmpR.StartsWith("率性") OrElse sTmpR.StartsWith("率直") OrElse sTmpR.StartsWith("率真") _
               OrElse sTmpR.StartsWith("率兵") _
            Then
                Return "shuai"
            End If

            Return "lv"
        End If

        If "便".Equals(sTxt) Then
            If sTmpL.EndsWith("大腹便") OrElse sTmpL.EndsWith("大腹便便") Then
                Return "pian"
            End If

            If sTmpR.StartsWith("便人") OrElse sTmpR.StartsWith("便嬖") OrElse sTmpR.StartsWith("便佞") _
               OrElse sTmpR.StartsWith("便旋") OrElse sTmpR.StartsWith("便言") OrElse sTmpR.StartsWith("便宜") _
            Then
                Return "pian"
            End If

            Return "bian"
        End If

        If "害".Equals(sTxt) Then
            If sTmpL.EndsWith("害澣害") Then
                Return "he"
            End If

            If sTmpR.StartsWith("害不违卜") OrElse sTmpR.StartsWith("害澣害否") Then
                Return "he"
            End If

            Return "hai"
        End If

        If "勒".Equals(sTxt) Then
            If sTmpL.EndsWith("涨勒") OrElse sTmpL.EndsWith("紧勒") Then
                Return "lei"
            End If

            If sTmpR.StartsWith("勒死") OrElse sTmpR.StartsWith("勒紧") Then
                Return "lei"
            End If

            Return "le"
        End If

        If "番".Equals(sTxt) Then
            If sTmpR.StartsWith("番禺") OrElse sTmpR.StartsWith("番维司徒") Then
                Return "pan"
            End If

            Return "fan"
        End If

        If "石".Equals(sTxt) Then
            If sTmpR.StartsWith("石二鸟") Then
                Return "shi"
            End If
            If sTmpL.EndsWith("一石") OrElse sTmpL.EndsWith("四钧为石") OrElse sTmpL.EndsWith("重不过石") _
                OrElse sTmpL.EndsWith("两石") OrElse sTmpL.EndsWith("三石") Then
                Return "dan"
            End If

            Return "shi"
        End If

        If "哪".Equals(sTxt) Then
            If sTmpR.StartsWith("哪吒") Then
                Return "ne"
            End If

            Return "na"
        End If

        If "转".Equals(sTxt) Then
            Return "zhuan"
        End If

        If "查".Equals(sTxt) Then
            If sTmpL.EndsWith("两耳过肩查") Then
                Return "zha"
            End If
            If sTmpR.StartsWith("查秽") Then
                Return "zha"
            End If

            Return "cha"
        End If

        If "红".Equals(sTxt) Then
            If sTmpL.EndsWith("又夺园夫女红") Then
                Return "gong"
            End If
            If sTmpR.StartsWith("红女下机") Then
                Return "gong"
            End If

            Return "hong"
        End If

        If "综".Equals(sTxt) Then
            If text.Equals("综也") Then
                Return "zeng"
            End If
            If sTmpR.StartsWith("综光瓦亮") OrElse sTmpR.StartsWith("综亮") Then
                Return "zeng"
            End If

            Return "zong"
        End If

        If "属".Equals(sTxt) Then
            If text.Equals("属意") Then
                Return "zhu"
            End If
            If sTmpR.StartsWith("属望") Then
                Return "zhu"
            End If

            Return "shu"
        End If

        If "长".Equals(sTxt) Then
            If sTmpL.EndsWith("年长") OrElse sTmpL.EndsWith("生长") OrElse sTmpL.EndsWith("在率") _
               OrElse sTmpL.EndsWith("万夫之长") OrElse sTmpL.EndsWith("雄长") OrElse sTmpL.EndsWith("成长") _
               OrElse sTmpL.EndsWith("草木遂长") OrElse sTmpL.EndsWith("江南草长") OrElse sTmpL.EndsWith("助长") _
               OrElse sTmpL.EndsWith("滋长") OrElse sTmpL.EndsWith("增长") OrElse sTmpL.EndsWith("日日以长") _
               OrElse sTmpL.EndsWith("科长") OrElse sTmpL.EndsWith("处长") OrElse sTmpL.EndsWith("家长") _
               OrElse sTmpL.EndsWith("校长") OrElse sTmpL.EndsWith("厂长") OrElse sTmpL.EndsWith("市长") _
               OrElse sTmpL.EndsWith("军长") OrElse sTmpL.EndsWith("旅长") OrElse sTmpL.EndsWith("师长") _
               OrElse sTmpL.EndsWith("排长") OrElse sTmpL.EndsWith("连长") OrElse sTmpL.EndsWith("营长") _
               OrElse sTmpL.EndsWith("室长") OrElse sTmpL.EndsWith("司长") OrElse sTmpL.EndsWith("团长") _
               OrElse sTmpL.EndsWith("县长") OrElse sTmpL.EndsWith("省长") OrElse sTmpL.EndsWith("部长") _
               OrElse sTmpL.EndsWith("助长") OrElse sTmpL.EndsWith("组长") OrElse sTmpL.EndsWith("局长") _
               OrElse sTmpL.EndsWith("族长") OrElse sTmpL.EndsWith("区长") OrElse sTmpL.EndsWith("厅长") _
               OrElse sTmpL.EndsWith("台长") OrElse sTmpL.EndsWith("探长") OrElse sTmpL.EndsWith("庭长") _
               OrElse sTmpL.EndsWith("徒长") OrElse sTmpL.EndsWith("艇长") OrElse sTmpL.EndsWith("亭长") _
               OrElse sTmpL.EndsWith("院长") OrElse sTmpL.EndsWith("士长") OrElse sTmpL.EndsWith("队长") _
               OrElse sTmpL.EndsWith("店长") OrElse sTmpL.EndsWith("疯长") OrElse sTmpL.EndsWith("镇长") _
               OrElse sTmpL.EndsWith("村长") OrElse sTmpL.EndsWith("船长") OrElse sTmpL.EndsWith("成长") _
               OrElse sTmpL.EndsWith("处长") OrElse sTmpL.EndsWith("车长") OrElse sTmpL.EndsWith("场长") _
               OrElse sTmpL.EndsWith("班长") OrElse sTmpL.EndsWith("保长") OrElse sTmpL.EndsWith("盟长") _
               OrElse sTmpL.EndsWith("酋长") OrElse sTmpL.EndsWith("尊长") OrElse sTmpL.EndsWith("寨长") _
               OrElse sTmpL.EndsWith("警长") OrElse sTmpL.EndsWith("社长") OrElse sTmpL.EndsWith("参谋长") _
               OrElse sTmpL.EndsWith("消长") OrElse sTmpL.EndsWith("舰长") OrElse sTmpL.EndsWith("股长") _
               OrElse sTmpL.EndsWith("行长") OrElse sTmpL.EndsWith("长女") OrElse sTmpL.EndsWith("审计长") _
               OrElse sTmpL.EndsWith("议长") OrElse sTmpL.EndsWith("务长") OrElse sTmpL.EndsWith("仲长") _
               OrElse sTmpL.EndsWith("厩长") OrElse sTmpL.EndsWith("土长") OrElse sTmpL.EndsWith("日长") _
               OrElse sTmpL.EndsWith("消长") OrElse sTmpL.EndsWith("岁长") OrElse sTmpL.EndsWith("所长") _
               OrElse sTmpL.EndsWith("女长") OrElse sTmpL.EndsWith("检察长") OrElse sTmpL.EndsWith("委员长") _
               OrElse sTmpL.EndsWith("董事长") OrElse sTmpL.EndsWith("乡长") OrElse sTmpL.EndsWith("站长") _
               OrElse sTmpL.EndsWith("楼长") OrElse sTmpL.EndsWith("灵长") OrElse sTmpL.EndsWith("狱长") _
               OrElse sTmpL.EndsWith("署长") OrElse sTmpL.EndsWith("矿长") OrElse sTmpL.EndsWith("机长") _
               OrElse sTmpL.EndsWith("财长") OrElse sTmpL.EndsWith("矿长") OrElse sTmpL.EndsWith("段长") _
               OrElse sTmpL.EndsWith("嫡长") OrElse sTmpL.EndsWith("君长") OrElse sTmpL.EndsWith("屯长") _
               OrElse sTmpL.EndsWith("舍长") OrElse sTmpL.EndsWith("炮长") OrElse sTmpL.EndsWith("户长") _
               OrElse sTmpL.EndsWith("课长") OrElse sTmpL.EndsWith("夏长") OrElse sTmpL.EndsWith("工长") _
               OrElse sTmpL.EndsWith("百长") OrElse sTmpL.EndsWith("房长") OrElse sTmpL.EndsWith("巡长") _
               OrElse sTmpL.EndsWith("阁长") OrElse sTmpL.EndsWith("道长") OrElse sTmpL.EndsWith("巡长") _
            Then
                Return "zhang"
            End If

            If sTmpR.StartsWith("长老") OrElse sTmpR.StartsWith("长者") OrElse sTmpR.StartsWith("长子") _
               OrElse sTmpR.StartsWith("长君") OrElse sTmpR.StartsWith("长德") OrElse sTmpR.StartsWith("长贤") _
               OrElse sTmpR.StartsWith("长宾") OrElse sTmpR.StartsWith("长郎") OrElse sTmpR.StartsWith("长殇") _
               OrElse sTmpR.StartsWith("长兄") OrElse sTmpR.StartsWith("长弟") OrElse sTmpR.StartsWith("长庶") _
               OrElse sTmpR.StartsWith("长嫡") OrElse sTmpR.StartsWith("长杰") OrElse sTmpR.StartsWith("长妾") _
               OrElse sTmpR.StartsWith("长公主") OrElse sTmpR.StartsWith("长吏") OrElse sTmpR.StartsWith("长雄") _
               OrElse sTmpR.StartsWith("长爵") OrElse sTmpR.StartsWith("长成") OrElse sTmpR.StartsWith("长俊") _
               OrElse sTmpR.StartsWith("长立") OrElse sTmpR.StartsWith("长牙") OrElse sTmpR.StartsWith("长毛") _
               OrElse sTmpR.StartsWith("长肉") OrElse sTmpR.StartsWith("长胖") OrElse sTmpR.StartsWith("长出来") _
               OrElse sTmpR.StartsWith("长我") OrElse sTmpR.StartsWith("长养") OrElse sTmpR.StartsWith("长育") _
               OrElse sTmpR.StartsWith("长寇") OrElse sTmpR.StartsWith("长俭") OrElse sTmpR.StartsWith("长知识") _
               OrElse sTmpR.StartsWith("长见识") OrElse sTmpR.StartsWith("长夫") OrElse sTmpR.StartsWith("长家") _
               OrElse sTmpR.StartsWith("长卿") OrElse sTmpR.StartsWith("长侯") OrElse sTmpR.StartsWith("长辈") _
               OrElse sTmpR.StartsWith("长膘") OrElse sTmpR.StartsWith("长虫") OrElse sTmpR.StartsWith("长大") _
               OrElse sTmpR.StartsWith("长房") OrElse sTmpR.StartsWith("长官") OrElse sTmpR.StartsWith("长厚") _
               OrElse sTmpR.StartsWith("长进") OrElse sTmpR.StartsWith("长君") OrElse sTmpR.StartsWith("长吏") _
               OrElse sTmpR.StartsWith("长亲") OrElse sTmpR.StartsWith("长上") OrElse sTmpR.StartsWith("长史") _
               OrElse sTmpR.StartsWith("长势") OrElse sTmpR.StartsWith("长相") OrElse sTmpR.StartsWith("长头发") _
               OrElse sTmpR.StartsWith("长指甲") OrElse sTmpR.StartsWith("长牙") OrElse sTmpR.StartsWith("长皮") _
               OrElse sTmpR.StartsWith("长歪") OrElse sTmpR.StartsWith("长斜") OrElse sTmpR.StartsWith("长身") _
               OrElse sTmpR.StartsWith("长官") OrElse sTmpR.StartsWith("长得") OrElse sTmpR.StartsWith("长女") _
               OrElse sTmpR.StartsWith("长公") OrElse sTmpR.StartsWith("长骨") OrElse sTmpR.StartsWith("长一智") _
               OrElse sTmpR.StartsWith("长男") OrElse sTmpR.StartsWith("长幼") OrElse sTmpR.StartsWith("长他人") _
               OrElse sTmpR.StartsWith("长眼") OrElse sTmpR.StartsWith("长大") OrElse sTmpR.StartsWith("长他人") _
            Then
                Return "zhang"
            End If

            Return "chang"
        End If

        If "卡".Equals(sTxt) Then
            If sTmpR.StartsWith("卡脖子") OrElse sTmpR.StartsWith("卡具") OrElse sTmpR.StartsWith("卡壳") _
               OrElse sTmpR.StartsWith("卡子") _
            Then
                Return "qia"
            End If

            Return "ka"
        End If

        If "薄".Equals(sTxt) Then
            If sTmpL.EndsWith("厚薄") OrElse sTmpL.EndsWith("浅薄") OrElse sTmpL.EndsWith("嘴薄") _
               OrElse sTmpL.EndsWith("菲薄") OrElse sTmpL.EndsWith("轻薄") OrElse sTmpL.EndsWith("刻薄") _
               OrElse sTmpL.EndsWith("鄙薄") OrElse sTmpL.EndsWith("日薄") OrElse sTmpL.EndsWith("淡薄") _
            Then
                Return "bo"
            End If

            If sTmpR.StartsWith("薄礼") OrElse sTmpR.StartsWith("薄产") OrElse sTmpR.StartsWith("薄命") _
               OrElse sTmpR.StartsWith("薄寒") OrElse sTmpR.StartsWith("薄酬") OrElse sTmpR.StartsWith("薄夫") _
               OrElse sTmpR.StartsWith("薄幸") OrElse sTmpR.StartsWith("薄情") OrElse sTmpR.StartsWith("薄古") _
               OrElse sTmpR.StartsWith("薄弱") OrElse sTmpR.StartsWith("薄近") OrElse sTmpR.StartsWith("薄暮") _
               OrElse sTmpR.StartsWith("薄暗") OrElse sTmpR.StartsWith("薄产") OrElse sTmpR.StartsWith("薄酬") _
               OrElse sTmpR.StartsWith("薄待") OrElse sTmpR.StartsWith("薄技") OrElse sTmpR.StartsWith("薄酒") _
               OrElse sTmpR.StartsWith("薄利") OrElse sTmpR.StartsWith("薄明") OrElse sTmpR.StartsWith("薄田") _
               OrElse sTmpR.StartsWith("薄雾") OrElse sTmpR.StartsWith("薄晓") OrElse sTmpR.StartsWith("薄幸") _
               OrElse sTmpR.StartsWith("薄养") OrElse sTmpR.StartsWith("薄荷") OrElse sTmpR.StartsWith("薄面") _
            Then
                Return "bo"
            End If

            Return "bao"
        End If

        If "劲".Equals(sTxt) Then
            If sTmpL.EndsWith("费劲") OrElse sTmpL.EndsWith("干劲") OrElse sTmpL.EndsWith("起劲") _
               OrElse sTmpL.EndsWith("牛劲") OrElse sTmpL.EndsWith("加劲") OrElse sTmpL.EndsWith("用劲") _
               OrElse sTmpL.EndsWith("带劲") OrElse sTmpL.EndsWith("脚劲") OrElse sTmpL.EndsWith("腿劲") _
               OrElse sTmpL.EndsWith("上劲") OrElse sTmpL.EndsWith("兴劲") OrElse sTmpL.EndsWith("明劲") _
               OrElse sTmpL.EndsWith("没劲") OrElse sTmpL.EndsWith("对劲") OrElse sTmpL.EndsWith("够劲") _
            Then
                Return "jin"
            End If

            If sTmpR.StartsWith("劲头") OrElse sTmpR.StartsWith("劲兵") OrElse sTmpR.StartsWith("劲力") _
            Then
                Return "jin"
            End If

            Return "jing"
        End If

        If "血".Equals(sTxt) Then
            Return "xue"
        End If

        If "那".Equals(sTxt) Then
            Return "na"
        End If

        If "调".Equals(sTxt) Then
            If sTmpL.EndsWith("烹调") OrElse sTmpL.EndsWith("空调") OrElse sTmpL.EndsWith("失调") Then
                Return "tiao"
            End If

            If sTmpR.StartsWith("调节") OrElse sTmpR.StartsWith("调和") OrElse sTmpR.StartsWith("调悦") _
               OrElse sTmpR.StartsWith("调排") OrElse sTmpR.StartsWith("调整") OrElse sTmpR.StartsWith("调风") _
               OrElse sTmpR.StartsWith("调气") OrElse sTmpR.StartsWith("调息") OrElse sTmpR.StartsWith("调养") _
               OrElse sTmpR.StartsWith("调治") OrElse sTmpR.StartsWith("调神") OrElse sTmpR.StartsWith("调喉") _
               OrElse sTmpR.StartsWith("调侃") OrElse sTmpR.StartsWith("调三窝四") OrElse sTmpR.StartsWith("调白") _
               OrElse sTmpR.StartsWith("调味") OrElse sTmpR.StartsWith("调料") OrElse sTmpR.StartsWith("调理") _
               OrElse sTmpR.StartsWith("调匀") OrElse sTmpR.StartsWith("调色") OrElse sTmpR.StartsWith("调音") _
               OrElse sTmpR.StartsWith("调弦") OrElse sTmpR.StartsWith("调高") OrElse sTmpR.StartsWith("调低") _
               OrElse sTmpR.StartsWith("调大") OrElse sTmpR.StartsWith("调小") OrElse sTmpR.StartsWith("调长") _
               OrElse sTmpR.StartsWith("调短") OrElse sTmpR.StartsWith("调粗") OrElse sTmpR.StartsWith("调细") _
               OrElse sTmpR.StartsWith("调琴") OrElse sTmpR.StartsWith("调济") OrElse sTmpR.StartsWith("调缓") _
               OrElse sTmpR.StartsWith("调快") OrElse sTmpR.StartsWith("调慢") OrElse sTmpR.StartsWith("调戏") _
               OrElse sTmpR.StartsWith("调光") OrElse sTmpR.StartsWith("调情") OrElse sTmpR.StartsWith("调引") _
               OrElse sTmpR.StartsWith("调打") OrElse sTmpR.StartsWith("调嘴") OrElse sTmpR.StartsWith("调舌") _
               OrElse sTmpR.StartsWith("调皮") OrElse sTmpR.StartsWith("调脾") OrElse sTmpR.StartsWith("调弄") _
               OrElse sTmpR.StartsWith("调素") OrElse sTmpR.StartsWith("调拨") OrElse sTmpR.StartsWith("调处") _
               OrElse sTmpR.StartsWith("调达") OrElse sTmpR.StartsWith("调档") OrElse sTmpR.StartsWith("调幅") _
               OrElse sTmpR.StartsWith("调成") OrElse sTmpR.StartsWith("调羹") OrElse sTmpR.StartsWith("调合") _
               OrElse sTmpR.StartsWith("调护") OrElse sTmpR.StartsWith("调级") OrElse sTmpR.StartsWith("调剂") _
               OrElse sTmpR.StartsWith("调价") OrElse sTmpR.StartsWith("调整") OrElse sTmpR.StartsWith("调焦") _
               OrElse sTmpR.StartsWith("调教") OrElse sTmpR.StartsWith("调解") OrElse sTmpR.StartsWith("调控") _
               OrElse sTmpR.StartsWith("调弄") OrElse sTmpR.StartsWith("调配") OrElse sTmpR.StartsWith("调频") _
               OrElse sTmpR.StartsWith("调摄") OrElse sTmpR.StartsWith("调试") OrElse sTmpR.StartsWith("调唆") _
               OrElse sTmpR.StartsWith("调停") OrElse sTmpR.StartsWith("调笑") OrElse sTmpR.StartsWith("调谐") _
               OrElse sTmpR.StartsWith("调协") OrElse sTmpR.StartsWith("调谑") OrElse sTmpR.StartsWith("调训") _
               OrElse sTmpR.StartsWith("调养") OrElse sTmpR.StartsWith("调制") OrElse sTmpR.StartsWith("调准") _
               OrElse sTmpR.StartsWith("调资") OrElse sTmpR.StartsWith("调薪") OrElse sTmpR.StartsWith("调序") _
               OrElse sTmpR.StartsWith("调畅") OrElse sTmpR.StartsWith("调调") OrElse sTmpR.StartsWith("调变") _
            Then
                Return "tiao"
            End If

            Return "diao"
        End If

        If "折".Equals(sTxt) Then
            If sTmpR.StartsWith("折本") OrElse sTmpR.StartsWith("折秤") OrElse sTmpR.StartsWith("折耗") _
               OrElse sTmpR.StartsWith("折钱") OrElse sTmpR.StartsWith("折阅") OrElse sTmpR.StartsWith("折腿") _
            Then
                Return "she"
            End If

            Return "zhe"
        End If

        If "句".Equals(sTxt) Then
            If sTmpR.StartsWith("句骊") OrElse sTmpR.StartsWith("句萌") OrElse sTmpR.StartsWith("句绳") _
               OrElse sTmpR.StartsWith("句兵") OrElse sTmpR.StartsWith("句者") OrElse sTmpR.StartsWith("句除") _
            Then
                Return "gou"
            End If

            Return "ju"
        End If

        If "厂".Equals(sTxt) Then
            Return "chang"
        End If
        If "趣".Equals(sTxt) Then
            Return "qu"
        End If
        If "被".Equals(sTxt) Then
            Return "bei"
        End If
        If "齐".Equals(sTxt) Then
            Return "qi"
        End If
        If "尿".Equals(sTxt) Then
            Return "niao"
        End If
        If "鸟".Equals(sTxt) Then
            Return "niao"
        End If
        If "脚".Equals(sTxt) Then
            Return "jiao"
        End If
        If "冒".Equals(sTxt) Then
            Return "mao"
        End If
        If "假".Equals(sTxt) Then
            Return "jia"
        End If
        If "谁".Equals(sTxt) Then
            Return "shui"
        End If
        If "感".Equals(sTxt) Then
            Return "gan"
        End If
        If "底".Equals(sTxt) Then
            Return "di"
        End If
        If "厕".Equals(sTxt) Then
            Return "ce"
        End If

        If "塔".Equals(sTxt) Then
            If sTmpL.EndsWith("圪塔") Then
                Return "da"
            End If
            Return "ta"
        End If

        If "若".Equals(sTxt) Then
            If sTmpL.EndsWith("般若") Then
                Return "re"
            End If
            Return "ruo"
        End If

        If "佛".Equals(sTxt) Then
            If sTmpL.EndsWith("仿佛") Then
                Return "fu"
            End If
            Return "fo"
        End If

        If "藏".Equals(sTxt) Then
            If sTmpR.StartsWith("藏着") OrElse sTmpR.StartsWith("藏了") OrElse sTmpR.StartsWith("藏于") _
               OrElse sTmpR.StartsWith("藏魂") OrElse sTmpR.StartsWith("藏神") OrElse sTmpR.StartsWith("藏魄") _
               OrElse sTmpR.StartsWith("藏意") OrElse sTmpR.StartsWith("藏志") OrElse sTmpR.StartsWith("藏于") _
               OrElse sTmpR.StartsWith("藏营") OrElse sTmpR.StartsWith("藏骨髓") OrElse sTmpR.StartsWith("藏髓") _
               OrElse sTmpR.StartsWith("藏火") OrElse sTmpR.StartsWith("藏骨髓") OrElse sTmpR.StartsWith("藏髓") _
            Then
                Return "cang"
            End If
            If sTmpL.EndsWith("主藏") OrElse sTmpL.EndsWith("仓禀不藏") OrElse sTmpL.EndsWith("能藏") _
             OrElse sTmpL.EndsWith("主藏") _
             Then
                Return "cang"
            End If
            If sTmpL.EndsWith("肺藏") AndAlso sTmpR.StartsWith("藏气") Then
                Return "cang"
            End If
            If (sTmpL.EndsWith("中藏") AndAlso sTmpR.StartsWith("藏经")) _
               OrElse (sTmpL.EndsWith("他藏") AndAlso sTmpR.StartsWith("藏他")) _
               Then
                Return "zang"
            End If

            If sTmpL.EndsWith("宝藏") OrElse sTmpL.EndsWith("守藏") OrElse sTmpL.EndsWith("五藏") _
               OrElse sTmpL.EndsWith("六藏") OrElse sTmpL.EndsWith("道藏") OrElse sTmpL.EndsWith("三藏") _
               OrElse sTmpL.EndsWith("释藏") OrElse sTmpL.EndsWith("西藏") OrElse sTmpL.EndsWith("驻藏") _
               OrElse sTmpL.EndsWith("心藏") OrElse sTmpL.EndsWith("脾藏") OrElse sTmpL.EndsWith("肝藏") _
               OrElse sTmpL.EndsWith("肺藏") OrElse sTmpL.EndsWith("肾藏") OrElse sTmpL.EndsWith("内藏") _
               OrElse sTmpL.EndsWith("雅鲁藏") OrElse sTmpL.EndsWith("青藏") OrElse sTmpL.EndsWith("阴藏") _
               OrElse sTmpL.EndsWith("入藏") OrElse sTmpL.EndsWith("之藏") OrElse sTmpL.EndsWith("生脏") _
               OrElse sTmpL.EndsWith("本藏") OrElse sTmpL.EndsWith("心包藏") OrElse sTmpL.EndsWith("彼藏") _
               OrElse sTmpL.EndsWith("阳藏") OrElse sTmpL.EndsWith("他藏") OrElse sTmpL.EndsWith("腑藏") _
               OrElse sTmpL.EndsWith("一藏") OrElse sTmpL.EndsWith("脉藏") OrElse sTmpL.EndsWith("各藏") _
               OrElse sTmpL.EndsWith("胃藏") OrElse sTmpL.EndsWith("温藏") OrElse sTmpL.EndsWith("胞藏") _
               OrElse sTmpL.EndsWith("中藏") OrElse sTmpL.EndsWith("润藏") OrElse sTmpL.EndsWith("秘藏") _
               OrElse sTmpL.EndsWith("病在藏") OrElse sTmpL.EndsWith("病在一藏") OrElse sTmpL.EndsWith("病之在藏") _
               OrElse sTmpL.EndsWith("刺大藏") OrElse sTmpL.EndsWith("其藏") OrElse sTmpL.EndsWith("何藏") _
               OrElse sTmpL.EndsWith("察其府藏") OrElse sTmpL.EndsWith("为在藏") OrElse sTmpL.EndsWith("臣以其藏") _
               OrElse sTmpL.EndsWith("四藏") OrElse sTmpL.EndsWith("输藏") OrElse sTmpL.EndsWith("迟者藏") _
               OrElse sTmpL.EndsWith("病胜藏") OrElse sTmpL.EndsWith("温藏") OrElse sTmpL.EndsWith("温其藏") _
               OrElse sTmpL.EndsWith("二藏") OrElse sTmpL.EndsWith("于藏") OrElse sTmpL.EndsWith("各藏") _
               OrElse sTmpL.EndsWith("府藏") OrElse sTmpL.EndsWith("牝藏") OrElse sTmpL.EndsWith("孤藏") _
               OrElse sTmpL.EndsWith("真藏") OrElse sTmpL.EndsWith("形藏") OrElse sTmpL.EndsWith("言藏") _
               OrElse sTmpL.EndsWith("其藏") OrElse sTmpL.EndsWith("一藏") OrElse sTmpL.EndsWith("九藏") _
               OrElse sTmpL.EndsWith("乘藏") OrElse sTmpL.EndsWith("伤藏") OrElse sTmpL.EndsWith("入此藏") _
               OrElse sTmpL.EndsWith("留于四藏") OrElse sTmpL.EndsWith("六藏") OrElse sTmpL.EndsWith("病藏") _
               OrElse sTmpL.EndsWith("犯藏") OrElse sTmpL.EndsWith("离藏") OrElse sTmpL.EndsWith("舍藏") _
               OrElse sTmpL.EndsWith("是必以藏") OrElse sTmpL.EndsWith("两藏") OrElse sTmpL.EndsWith("ccc") _
            Then
                Return "zang"
            End If
            If sTmpR.StartsWith("藏府") OrElse sTmpR.StartsWith("藏主") OrElse sTmpR.StartsWith("藏族") _
               OrElse sTmpR.StartsWith("藏民") OrElse sTmpR.StartsWith("藏獒") OrElse sTmpR.StartsWith("藏红花") _
               OrElse sTmpR.StartsWith("藏蓝") OrElse sTmpR.StartsWith("藏历") OrElse sTmpR.StartsWith("藏青") _
               OrElse sTmpR.StartsWith("藏戏") OrElse sTmpR.StartsWith("藏经") OrElse sTmpR.StartsWith("藏不病") _
               OrElse sTmpR.StartsWith("藏病") OrElse sTmpR.StartsWith("藏寒") OrElse sTmpR.StartsWith("藏热") _
               OrElse sTmpR.StartsWith("藏者") OrElse sTmpR.StartsWith("藏阴") OrElse sTmpR.StartsWith("藏阳") _
               OrElse sTmpR.StartsWith("藏器") OrElse sTmpR.StartsWith("藏燥") OrElse sTmpR.StartsWith("藏湿") _
               OrElse sTmpR.StartsWith("藏乃") OrElse sTmpR.StartsWith("藏气") OrElse sTmpR.StartsWith("藏湿") _
               OrElse sTmpR.StartsWith("藏腑") OrElse sTmpR.StartsWith("藏结") OrElse sTmpR.StartsWith("藏无") _
               OrElse sTmpR.StartsWith("藏安且良矣") OrElse sTmpR.StartsWith("藏不能") OrElse sTmpR.StartsWith("藏公路") _
               OrElse sTmpR.StartsWith("藏路") OrElse sTmpR.StartsWith("藏独主其病者") OrElse sTmpR.StartsWith("藏气虚") _
               OrElse sTmpR.StartsWith("藏马") OrElse sTmpR.StartsWith("藏名") OrElse sTmpR.StartsWith("藏结") _
               OrElse sTmpR.StartsWith("藏伤") OrElse sTmpR.StartsWith("藏象") OrElse sTmpR.StartsWith("藏有所伤") _
               OrElse sTmpR.StartsWith("藏俞") OrElse sTmpR.StartsWith("藏有要害") OrElse sTmpR.StartsWith("藏汤") _
               OrElse sTmpR.StartsWith("藏躁") OrElse sTmpR.StartsWith("藏有要害") OrElse sTmpR.StartsWith("藏汤") _
               OrElse sTmpR.StartsWith("藏之肝肺") OrElse sTmpR.StartsWith("藏真") OrElse sTmpR.StartsWith("藏之藏府") _
               OrElse sTmpR.StartsWith("藏之长也") OrElse sTmpR.StartsWith("藏丸") OrElse sTmpR.StartsWith("藏脉") _
               OrElse sTmpR.StartsWith("藏王") OrElse sTmpR.StartsWith("藏安") OrElse sTmpR.StartsWith("藏同病") _
               OrElse sTmpR.StartsWith("藏之盖") OrElse sTmpR.StartsWith("藏气之湿寒已动") OrElse sTmpR.StartsWith("藏取") _
               OrElse sTmpR.StartsWith("藏病") OrElse sTmpR.StartsWith("藏疾") OrElse sTmpR.StartsWith("藏瑕") _
               OrElse sTmpR.StartsWith("藏主") OrElse sTmpR.StartsWith("藏应") OrElse sTmpR.StartsWith("藏丹") _
               OrElse sTmpR.StartsWith("藏害") OrElse sTmpR.StartsWith("藏不病") OrElse sTmpR.StartsWith("藏丹") _
            Then
                Return "zang"
            End If

            Return "cang"
        End If

        If "遗".Equals(sTxt) Then
            If sTmpL.EndsWith("厚遗") OrElse sTmpL.EndsWith("裘葛之遗") Then
                Return "wei"
            End If
            If sTmpR.StartsWith("遗以水") OrElse sTmpR.StartsWith("遗单于") OrElse sTmpR.StartsWith("遗贼") _
               OrElse sTmpR.StartsWith("遗赂") OrElse sTmpR.StartsWith("遗劳") OrElse sTmpR.StartsWith("遗酌") _
               OrElse sTmpR.StartsWith("遗送") OrElse sTmpR.StartsWith("遗金") OrElse sTmpR.StartsWith("遗赵王") _
               OrElse sTmpR.StartsWith("遗魏王") OrElse sTmpR.StartsWith("遗权") OrElse sTmpR.StartsWith("遗操") _
               OrElse sTmpR.StartsWith("遗使") OrElse sTmpR.StartsWith("遗秉") OrElse sTmpR.StartsWith("遗大") _
            Then
                Return "wei"
            End If

            Return "yi"
        End If

        If "仇".Equals(sTxt) Then
            If sTmpL.EndsWith("好仇") Then
                Return "qiu"
            End If

            Return "chou"
        End If

        If "还".Equals(sTxt) Then
            If sTmpL.EndsWith("吾其还") OrElse sTmpL.EndsWith("复还") OrElse sTmpL.EndsWith("自南海还") _
              OrElse sTmpL.EndsWith("视无还") OrElse sTmpL.EndsWith("引车右还") OrElse sTmpL.EndsWith("三人还") _
              OrElse sTmpL.EndsWith("水潦所还") OrElse sTmpL.EndsWith("王业还") OrElse sTmpL.EndsWith("奉还") _
              OrElse sTmpL.EndsWith("归还") OrElse sTmpL.EndsWith("交还") OrElse sTmpL.EndsWith("偿还") _
              OrElse sTmpL.EndsWith("主人答拜还") OrElse sTmpL.EndsWith("流弊不还") OrElse sTmpL.EndsWith("而不还") _
              OrElse sTmpL.EndsWith("归还") OrElse sTmpL.EndsWith("追还") OrElse sTmpL.EndsWith("以眼还") _
              OrElse sTmpL.EndsWith("循还") OrElse sTmpL.EndsWith("退还") OrElse sTmpL.EndsWith("讨还") _
              OrElse sTmpL.EndsWith("逐物不还") OrElse sTmpL.EndsWith("有借无还") OrElse sTmpL.EndsWith("有借有还") _
              OrElse sTmpL.EndsWith("要还") OrElse sTmpL.EndsWith("抵还") OrElse sTmpL.EndsWith("珠还") _
               Then
                Return "huan"
            End If
            If sTmpR.StartsWith("还而不入") OrElse sTmpR.StartsWith("还部白府君") OrElse sTmpR.StartsWith("还内") _
               OrElse sTmpR.StartsWith("还故乡") OrElse sTmpR.StartsWith("还家") OrElse sTmpR.StartsWith("还首") _
               OrElse sTmpR.StartsWith("还云") OrElse sTmpR.StartsWith("还函") OrElse sTmpR.StartsWith("还转") _
               OrElse sTmpR.StartsWith("还复") OrElse sTmpR.StartsWith("还顾") OrElse sTmpR.StartsWith("还睇") _
               OrElse sTmpR.StartsWith("还视") OrElse sTmpR.StartsWith("还授师") OrElse sTmpR.StartsWith("还辟再拜稽首") _
               OrElse sTmpR.StartsWith("还玩吴国") OrElse sTmpR.StartsWith("还公宫") OrElse sTmpR.StartsWith("还郑而来") _
               OrElse sTmpR.StartsWith("还庐树桑") OrElse sTmpR.StartsWith("还柱走") OrElse sTmpR.StartsWith("还之") _
               OrElse sTmpR.StartsWith("还柱而走") OrElse sTmpR.StartsWith("还绕") OrElse sTmpR.StartsWith("还旋") _
               OrElse sTmpR.StartsWith("还原") OrElse sTmpR.StartsWith("还其职") OrElse sTmpR.StartsWith("还惺") _
               OrElse sTmpR.StartsWith("还质") OrElse sTmpR.StartsWith("还睦") OrElse sTmpR.StartsWith("还童") _
               OrElse sTmpR.StartsWith("还级") OrElse sTmpR.StartsWith("还归") OrElse sTmpR.StartsWith("还珠") _
               OrElse sTmpR.StartsWith("还璧") OrElse sTmpR.StartsWith("还矢") OrElse sTmpR.StartsWith("还租庸") _
               OrElse sTmpR.StartsWith("还款") OrElse sTmpR.StartsWith("还兵") OrElse sTmpR.StartsWith("还你名实兼收") _
               OrElse sTmpR.StartsWith("还复然") OrElse sTmpR.StartsWith("还为狗者") OrElse sTmpR.StartsWith("法立而还") _
               OrElse sTmpR.StartsWith("还兮") OrElse sTmpR.StartsWith("还本") OrElse sTmpR.StartsWith("还魂") _
               OrElse sTmpR.StartsWith("还击") OrElse sTmpR.StartsWith("还价") OrElse sTmpR.StartsWith("还口") _
               OrElse sTmpR.StartsWith("还礼") OrElse sTmpR.StartsWith("还清") OrElse sTmpR.StartsWith("还手") _
               OrElse sTmpR.StartsWith("还俗") OrElse sTmpR.StartsWith("还席") OrElse sTmpR.StartsWith("还原") _
               OrElse sTmpR.StartsWith("还愿") OrElse sTmpR.StartsWith("还债") OrElse sTmpR.StartsWith("还账") _
               OrElse sTmpR.StartsWith("还嘴") OrElse sTmpR.StartsWith("还牙") OrElse sTmpR.StartsWith("还书") _
               OrElse sTmpR.StartsWith("还我") OrElse sTmpR.StartsWith("还你") OrElse sTmpR.StartsWith("还他") _
               OrElse sTmpR.StartsWith("还钱") OrElse sTmpR.StartsWith("还机") OrElse sTmpR.StartsWith("还电脑") _
               OrElse sTmpR.StartsWith("还车") OrElse sTmpR.StartsWith("还债") OrElse sTmpR.StartsWith("还利息") _
               OrElse sTmpR.StartsWith("还一报") OrElse sTmpR.StartsWith("还合浦") OrElse sTmpR.StartsWith("还乡") _
               OrElse sTmpR.StartsWith("还她") OrElse sTmpR.StartsWith("还师") OrElse sTmpR.StartsWith("还退") _
               OrElse sTmpR.StartsWith("还脚") OrElse sTmpR.StartsWith("还肉") OrElse sTmpR.StartsWith("还山") _
            Then
                Return "huan"
            End If

            Return "hai"
        End If

        If "契".Equals(sTxt) Then
            Return "qi"
        End If
        If "脉".Equals(sTxt) Then
            Return "mai"
        End If
        If "县".Equals(sTxt) Then
            Return "xian"
        End If
        If "扎".Equals(sTxt) Then
            Return "zha"
        End If

        If "阇".Equals(sTxt) Then
            If sTmpR.StartsWith("阇台") OrElse sTmpR.StartsWith("阇谓之台") OrElse sTmpR.StartsWith("阇里") _
               OrElse sTmpR.StartsWith("阇城") Then
                Return "du"
            End If
            Return "she"
        End If
        If "谷".Equals(sTxt) Then
            If sTmpR.StartsWith("谷浑") Then
                Return "yu"
            End If
            Return "gu"
        End If

        If "乐".Equals(sTxt) Then
            If sTmpL.EndsWith("快乐") Then
                Return "le"
            End If
            If sTmpL.EndsWith("音乐") OrElse sTmpL.EndsWith("和乐") OrElse sTmpL.EndsWith("设乐") _
               OrElse sTmpL.EndsWith("奏乐") OrElse sTmpL.EndsWith("声乐") _
               Then
                Return "yue"
            End If
            If sTmpR.StartsWith("乐官") OrElse sTmpR.StartsWith("乐节") OrElse sTmpR.StartsWith("乐德") _
               OrElse sTmpR.StartsWith("乐仪") OrElse sTmpR.StartsWith("乐器") OrElse sTmpR.StartsWith("乐悬") _
               OrElse sTmpR.StartsWith("乐歌") OrElse sTmpR.StartsWith("乐曲") OrElse sTmpR.StartsWith("乐钟") _
               OrElse sTmpR.StartsWith("乐手") OrElse sTmpR.StartsWith("乐池") OrElse sTmpR.StartsWith("乐队") _
               OrElse sTmpR.StartsWith("乐团") OrElse sTmpR.StartsWith("乐府") OrElse sTmpR.StartsWith("乐感") _
               OrElse sTmpR.StartsWith("乐曲") OrElse sTmpR.StartsWith("乐迷") OrElse sTmpR.StartsWith("乐律") _
               OrElse sTmpR.StartsWith("乐谱") OrElse sTmpR.StartsWith("乐请") OrElse sTmpR.StartsWith("乐沙") _
               OrElse sTmpR.StartsWith("乐师") OrElse sTmpR.StartsWith("乐坛") OrElse sTmpR.StartsWith("乐音") _
               OrElse sTmpR.StartsWith("乐章") OrElse sTmpR.StartsWith("乐正") _
               Then
                Return "yue"
            End If
            Return "le"
        End If

        If "降".Equals(sTxt) Then
            If sTmpL.EndsWith("投降") OrElse sTmpL.EndsWith("曷为不言降") OrElse sTmpL.EndsWith("琮已降") _
               OrElse sTmpL.EndsWith("诈云欲降") OrElse sTmpL.EndsWith("指言盖降") OrElse sTmpL.EndsWith("我心则降") _
               OrElse sTmpL.EndsWith("明降") Then
                Return "xiang"
            End If
            If sTmpR.StartsWith("降卒") OrElse sTmpR.StartsWith("降附") OrElse sTmpR.StartsWith("降骨") _
               OrElse sTmpR.StartsWith("降服") OrElse sTmpR.StartsWith("降听") OrElse sTmpR.StartsWith("降以相从也") _
               OrElse sTmpR.StartsWith("降虏兼千帐") OrElse sTmpR.StartsWith("降他") OrElse sTmpR.StartsWith("降发") _
               OrElse sTmpR.StartsWith("降伏") OrElse sTmpR.StartsWith("降视") OrElse sTmpR.StartsWith("降龙") _
               Then
                Return "xiang"
            End If
            Return "jiang"
        End If

        If "伽".Equals(sTxt) Then
            If sTmpR.StartsWith("伽马") Then
                Return "ga"
            End If
            If sTmpR.StartsWith("伽南香") OrElse sTmpR.StartsWith("伽蓝") _
               Then
                Return "qie"
            End If
            Return "jia"
        End If

        If "奇".Equals(sTxt) Then
            If sTmpR.StartsWith("奇数") OrElse sTmpR.StartsWith("奇偶") OrElse sTmpR.StartsWith("奇日") _
               OrElse sTmpR.StartsWith("奇零") OrElse sTmpR.StartsWith("奇赢") OrElse sTmpR.StartsWith("奇函") _
               Then
                Return "ji"
            End If
            If text.Equals("奇左") OrElse text.Equals("时有奇羡") OrElse text.Equals("操其奇赢") _
               OrElse text.Equals("旁入奇利") OrElse text.Equals("时有奇羡") OrElse text.Equals("操其奇赢") _
               Then
                Return "ji"
            End If
            Return "qi"
        End If
        If "嗌".Equals(sTxt) Then
            If sTmpL.EndsWith("嗌嗌") OrElse sTmpR.StartsWith("嗌嗌") Then
                Return "ai"
            End If
            Return "yi"
        End If

        If "轧".Equals(sTxt) Then
            If sTmpR.StartsWith("轧场") OrElse sTmpR.StartsWith("轧道") OrElse sTmpR.StartsWith("轧光") _
               OrElse sTmpR.StartsWith("轧花") OrElse sTmpR.StartsWith("轧棉") OrElse sTmpR.StartsWith("轧染") _
               OrElse sTmpL.EndsWith("轧轧") OrElse sTmpR.StartsWith("轧轧") OrElse sTmpR.StartsWith("轧然") _
               Then
                Return "ya"
            End If
            Return "zha"
        End If

        If "扁".Equals(sTxt) Then
            If sTmpR.StartsWith("扁舟") OrElse sTmpL.EndsWith("扁扁") OrElse sTmpR.StartsWith("扁扁") _
               OrElse sTmpR.StartsWith("扁枯") OrElse sTmpR.StartsWith("扁乘") _
               Then
                Return "pian"
            End If
            Return "bian"
        End If
        If "苦".Equals(sTxt) Then
            Return "ku"
        End If
        If "艾".Equals(sTxt) Then
            Return "ai"
        End If
        If "敦".Equals(sTxt) Then
            Return "dun"
        End If

        If "丁".Equals(sTxt) Then
            If sTmpL.EndsWith("丁丁地图") OrElse sTmpL.EndsWith("丁地图") Then
                Return "ding"
            End If
            If sTmpL.EndsWith("丁丁") OrElse sTmpR.StartsWith("丁丁") Then
                Return "zheng"
            End If
            Return "ding"
        End If

        If "恶".Equals(sTxt) Then
            If sTmpL.EndsWith("憎恶") OrElse sTmpL.EndsWith("可恶") OrElse sTmpL.EndsWith("厌恶") _
               OrElse sTmpL.EndsWith("怨恶") OrElse sTmpL.EndsWith("深恶") OrElse sTmpL.EndsWith("恶恶") _
               OrElse sTmpL.EndsWith("爱恶") OrElse sTmpL.EndsWith("好恶") _
               Then
                Return "wu"
            End If
            If sTmpR.StartsWith("恶识宗") OrElse sTmpR.StartsWith("恶用") OrElse sTmpR.StartsWith("恶知") _
               OrElse sTmpR.StartsWith("恶能") OrElse sTmpR.StartsWith("恶寒") OrElse sTmpR.StartsWith("恶热") _
               OrElse sTmpR.StartsWith("恶冷") OrElse sTmpR.StartsWith("恶忌") OrElse sTmpR.StartsWith("恶生") _
               OrElse sTmpR.StartsWith("恶不去善") OrElse sTmpR.StartsWith("恶杀") OrElse sTmpR.StartsWith("恶紫夺朱") _
               OrElse sTmpR.StartsWith("恶嫌") OrElse sTmpR.StartsWith("恶惮") OrElse sTmpR.StartsWith("恶识") _
               OrElse sTmpR.StartsWith("恶上") OrElse sTmpR.StartsWith("恶恶") OrElse sTmpR.StartsWith("恶讪") _
               OrElse sTmpR.StartsWith("恶囊") OrElse sTmpR.StartsWith("恶湿") OrElse sTmpR.StartsWith("恶风") _
               Then
                Return "wu"
            End If
            Return "e"
        End If

        If "缉".Equals(sTxt) Then
            If sTmpR.StartsWith("缉鞋") Then
                Return "qi"
            End If
            Return "ji"
        End If
        If "矜".Equals(sTxt) Then
            Return "jin"
        End If

        If "伯".Equals(sTxt) Then
            Return "bo"
        End If

        If "柏".Equals(sTxt) Then
            If sTmpL.EndsWith("黄柏") Then
                Return "bo"
            End If
            If sTmpR.StartsWith("柏拉图") OrElse sTmpR.StartsWith("柏林") Then
                Return "bo"
            End If
            Return "bai"
        End If

        If "堡".Equals(sTxt) Then
            If sTmpL.EndsWith("马家堡") OrElse sTmpL.EndsWith("吴堡") OrElse sTmpL.EndsWith("柴沟堡") Then
                Return "bu"
            End If
            If sTmpL.EndsWith("十里堡") Then
                Return "pu"
            End If
            If sTmpR.StartsWith("堡子") OrElse sTmpR.StartsWith("柏林") Then
                Return "bu"
            End If
            Return "bao"
        End If

        If "莎".Equals(sTxt) Then
            If sTmpR.StartsWith("莎草") OrElse sTmpR.StartsWith("莎池") OrElse sTmpR.StartsWith("莎岸") _
                OrElse sTmpR.StartsWith("莎洲") OrElse sTmpR.StartsWith("莎香") OrElse sTmpR.StartsWith("莎庭") _
                OrElse sTmpR.StartsWith("莎径") OrElse sTmpR.StartsWith("莎阶") OrElse sTmpR.StartsWith("莎台") _
                OrElse sTmpR.StartsWith("莎衣") OrElse sTmpR.StartsWith("莎笠") OrElse sTmpL.EndsWith("未莎") _
                Then
                Return "suo"
            End If
            Return "sha"
        End If

        If "贾".Equals(sTxt) Then
            If sTmpL.EndsWith("多财善贾") OrElse sTmpL.EndsWith("商贾") Then
                Return "gu"
            End If
            If sTmpR.StartsWith("贾资") OrElse sTmpR.StartsWith("贾道") OrElse sTmpR.StartsWith("贾贸") _
                OrElse sTmpR.StartsWith("贾贷") OrElse sTmpR.StartsWith("贾欺") OrElse sTmpR.StartsWith("贾用") _
                OrElse sTmpR.StartsWith("贾勇") OrElse sTmpR.StartsWith("贾余馀勇") OrElse sTmpR.StartsWith("贾马") _
                OrElse sTmpR.StartsWith("贾田") OrElse sTmpR.StartsWith("贾官") OrElse sTmpR.StartsWith("贾好") _
                OrElse sTmpR.StartsWith("贾誉") OrElse sTmpR.StartsWith("贾诚") OrElse sTmpR.StartsWith("贾国") _
                OrElse sTmpR.StartsWith("贾利") OrElse sTmpR.StartsWith("贾息") OrElse sTmpR.StartsWith("贾害") _
                OrElse sTmpR.StartsWith("贾憎") OrElse sTmpR.StartsWith("贾怠") OrElse sTmpR.StartsWith("贾竖") _
                OrElse sTmpR.StartsWith("贾胡") OrElse sTmpR.StartsWith("贾竖") OrElse sTmpR.StartsWith("贾侩") _
                OrElse sTmpR.StartsWith("贾正") OrElse sTmpR.StartsWith("贾祸") OrElse sTmpR.StartsWith("贾人") _
                Then
                Return "gu"
            End If
            Return "jia"
        End If

        If "膀".Equals(sTxt) Then
            If sTmpR.StartsWith("膀胱") OrElse sTmpL.EndsWith("商贾") Then
                Return "pang"
            End If
            Return "bang"
        End If
        If "剋".Equals(sTxt) Then
            Return "kei"
        End If

        If "食".Equals(sTxt) Then
            If text.Equals("郦食其") OrElse text.Equals("审食其") Then
                Return "yi"
            End If
            If sTmpR.StartsWith("食祭") OrElse sTmpR.StartsWith("食之") OrElse sTmpR.StartsWith("食马") Then
                Return "si"
            End If
            If text.Equals("将其来食") OrElse text.Equals("饮之食之") OrElse text.Equals("食以草具") _
                 OrElse text.Equals("吾赖是以食吾躯") OrElse text.Equals("食饥息劳") OrElse text.Equals("被褐食牛") _
            Then
                Return "si"
            End If
            Return "shi"
        End If

        If "莫".Equals(sTxt) Then
            If text.Equals("不夙则莫") OrElse text.Equals("谁夙知而莫成") OrElse text.Equals("谁夙知而莫成") _
                OrElse text.Equals("维莫之春") OrElse text.Equals("及莫又圣") OrElse text.Equals("旦莫日进食") _
                OrElse text.Equals("星辰莫同") OrElse text.Equals("莫夜月明") OrElse text.Equals("莫春者") _
                OrElse text.Equals("莫夜") _
            Then
                Return "mu"
            End If
            Return "mo"
        End If
        If "助".Equals(sTxt) Then
            Return "zhu"
        End If
        If "溺".Equals(sTxt) Then
            Return "ni"
        End If
        If "胖".Equals(sTxt) Then
            Return "pang"
        End If

        If "塞".Equals(sTxt) Then
            If text.Equals("刚而塞") OrElse text.Equals("其心塞渊") Then
                Return "se"
            End If
            If sTmpL.EndsWith("闭塞") OrElse sTmpL.EndsWith("阻塞") OrElse sTmpL.EndsWith("搪塞") _
                OrElse sTmpL.EndsWith("茅塞") Then
                Return "se"
            End If
            If sTmpR.StartsWith("塞音") OrElse sTmpR.StartsWith("塞责") OrElse sTmpL.EndsWith("食马") Then
                Return "se"
            End If
            Return "sai"
        End If

        If "摩".Equals(sTxt) Then
            If sTmpR.StartsWith("摩挲") Then
                Return "ma"
            End If
            Return "mo"
        End If

        If "巷".Equals(sTxt) Then
            If sTmpL.EndsWith("平巷") OrElse sTmpL.EndsWith("煤巷") OrElse sTmpL.EndsWith("风巷") Then
                Return "hang"
            End If
            Return "xiang"
        End If
        If "觉".Equals(sTxt) Then
            If sTmpL.EndsWith("午觉") OrElse sTmpL.EndsWith("睡了一大觉") OrElse sTmpL.EndsWith("睡了一觉") _
                OrElse sTmpL.EndsWith("睡大觉") OrElse sTmpL.EndsWith("睡了个觉") OrElse sTmpL.EndsWith("睡个觉") _
                OrElse sTmpL.EndsWith("睡觉") OrElse sTmpL.EndsWith("睡好觉") OrElse sTmpL.EndsWith("睡个好觉") _
            Then
                Return "jiao"
            End If
            If sTmpR.StartsWith("觉睡") Then
                Return "jiao"
            End If
            Return "jue"
        End If

        If "咽".Equals(sTxt) Then
            If sTmpL.EndsWith("充咽") OrElse sTmpL.EndsWith("哽咽") OrElse sTmpL.EndsWith("呜咽") _
            Then
                Return "ye"
            End If
            If sTmpR.StartsWith("咽人") OrElse sTmpR.StartsWith("咽哽") OrElse sTmpR.StartsWith("咽切") _
                OrElse sTmpR.StartsWith("咽瑥") OrElse sTmpR.StartsWith("咽塞") _
            Then
                Return "ye"
            End If
            Return "yan"
        End If

        If "叶".Equals(sTxt) Then
            If sTmpR.StartsWith("叶韵") Then
                Return "xie"
            End If
            If sTmpR.StartsWith("叶县南") OrElse sTmpR.StartsWith("叶县凫") Then
                Return "she"
            End If
            Return "ye"
        End If

        If "囝".Equals(sTxt) Then
            If sTmpL.EndsWith("郎罢别囝") OrElse sTmpL.EndsWith("阿囝") Then
                Return "jian"
            End If
            Return "nan"
        End If
        If "姆".Equals(sTxt) Then
            Return "mu"
        End If
        If "陶".Equals(sTxt) Then
            Return "tao"
        End If

        If "着".Equals(sTxt) Then
            If sTmpL.EndsWith("看着") OrElse sTmpL.EndsWith("拉着") Then
                Return "zhe"
            End If
            If sTmpL.EndsWith("衣着") Then
                Return "zhuo"
            End If
            If sTmpR.StartsWith("着装") OrElse sTmpR.StartsWith("着手") OrElse sTmpR.StartsWith("着重") Then
                Return "zhuo"
            End If
            If sTmpR.StartsWith("着凉") OrElse sTmpR.StartsWith("着急") OrElse sTmpR.StartsWith("着忙") _
                OrElse sTmpR.StartsWith("着风") OrElse sTmpR.StartsWith("着迷") OrElse sTmpR.StartsWith("着法") _
                OrElse sTmpR.StartsWith("着数") OrElse sTmpR.StartsWith("着天") OrElse sTmpR.StartsWith("着地") _
                OrElse sTmpR.StartsWith("着边") OrElse sTmpR.StartsWith("着慌") OrElse sTmpR.StartsWith("着火") _
                OrElse sTmpR.StartsWith("着紧") OrElse sTmpR.StartsWith("着魔") OrElse text.Equals("着三不着两") _
            Then
                Return "zhao"
            End If
            If sTmpL.EndsWith("躺下就着") OrElse sTmpL.EndsWith("睡着") OrElse sTmpL.EndsWith("三十六着") _
                OrElse sTmpL.EndsWith("猜着") OrElse sTmpL.EndsWith("睡着") OrElse sTmpL.EndsWith("三十六着") _
            Then
                Return "zhao"
            End If
            Return "zhe"
        End If
        If "摩".Equals(sTxt) Then
            If sTmpR.StartsWith("摩挲") Then
                Return "ma"
            End If
            Return "mo"
        End If
        If "晻".Equals(sTxt) Then
            Return "yan"
        End If
        If "皋".Equals(sTxt) Then
            If sTmpR.StartsWith("皋陶") Then
                Return "yao"
            End If
            If sTmpR.StartsWith("皋舞") Then
                Return "hao"
            End If
            Return "gao"
        End If
        If "犴".Equals(sTxt) Then
            If sTmpR.StartsWith("犴达罕") Then
                Return "han"
            End If
            Return "an"
        End If
        If "尺".Equals(sTxt) Then
            Return "chi"
        End If

        If "差".Equals(sTxt) Then
            If sTmpL.EndsWith("当差") OrElse sTmpL.EndsWith("兼差") OrElse sTmpL.EndsWith("出差") _
               OrElse sTmpL.EndsWith("公差") OrElse sTmpL.EndsWith("后虽小差") OrElse sTmpL.EndsWith("解差") _
               OrElse sTmpL.EndsWith("钦差") _
               Then
                Return "chai"
            End If
            If sTmpR.StartsWith("差人") OrElse sTmpR.StartsWith("差委") OrElse sTmpR.StartsWith("差遣") _
               OrElse sTmpR.StartsWith("差时择日") OrElse sTmpR.StartsWith("差择") OrElse sTmpR.StartsWith("差选") _
               OrElse sTmpR.StartsWith("差官") OrElse sTmpR.StartsWith("差尉") OrElse sTmpR.StartsWith("差徭") _
               OrElse sTmpR.StartsWith("差官") OrElse sTmpR.StartsWith("差役") OrElse sTmpR.StartsWith("差门") _
               OrElse sTmpR.StartsWith("差拨") OrElse sTmpR.StartsWith("差夫") OrElse sTmpR.StartsWith("差使") _
               OrElse sTmpR.StartsWith("差事") OrElse sTmpR.StartsWith("差夫") OrElse sTmpR.StartsWith("差使") _
            Then
                Return "chai"
            End If

            If sTmpL.EndsWith("参差") Then
                Return "ci"
            End If
            If sTmpR.StartsWith("差次") OrElse sTmpR.StartsWith("差降") OrElse sTmpR.StartsWith("差池") _
                OrElse sTmpR.StartsWith("差互") OrElse sTmpR.StartsWith("差肩") OrElse sTmpR.StartsWith("差序") _
            Then
                Return "ci"
            End If

            Return "cha"
        End If

        If "否".Equals(sTxt) Then
            If sTmpL.EndsWith("善否") OrElse sTmpL.EndsWith("万物否") OrElse sTmpL.EndsWith("逆为否") _
               OrElse sTmpL.EndsWith("臧否") OrElse sTmpL.EndsWith("心下否") OrElse sTmpL.EndsWith("逆为否") _
               Then
                Return "pi"
            End If
            If sTmpR.StartsWith("否极") OrElse sTmpR.StartsWith("否滞") OrElse sTmpR.StartsWith("否塞") _
               OrElse sTmpR.StartsWith("否结") OrElse sTmpR.StartsWith("否隔") OrElse sTmpR.StartsWith("否道") _
               OrElse sTmpR.StartsWith("否闭") OrElse sTmpR.StartsWith("否屈") OrElse sTmpR.StartsWith("否败") _
               OrElse sTmpR.StartsWith("否往") OrElse sTmpR.StartsWith("否而末泰") OrElse sTmpR.StartsWith("否运") _
               OrElse sTmpR.StartsWith("否心") OrElse sTmpR.StartsWith("否德") OrElse sTmpR.StartsWith("否臧") _
               OrElse sTmpR.StartsWith("否老") OrElse sTmpR.StartsWith("否妇") OrElse sTmpR.StartsWith("否者") _
               OrElse sTmpR.StartsWith("否痛") OrElse sTmpR.StartsWith("否肿") OrElse sTmpR.StartsWith("否卦") _
               OrElse sTmpR.StartsWith("否泰") _
            Then
                Return "pi"
            End If

            Return "fou"
        End If
        If "宁".Equals(sTxt) Then
            Return "ning"
        End If
        If "祭".Equals(sTxt) Then
            Return "ji"
        End If
        If "魄".Equals(sTxt) Then
            Return "po"
        End If
        If "瀑".Equals(sTxt) Then
            If sTmpL.EndsWith("飞瀑") OrElse sTmpL.EndsWith("终风且瀑") Then
                Return "pu"
            End If
            If sTmpR.StartsWith("瀑布") OrElse sTmpR.StartsWith("瀑水") OrElse sTmpR.StartsWith("瀑泉") _
               OrElse sTmpR.StartsWith("瀑流") OrElse sTmpR.StartsWith("瀑溜") OrElse sTmpR.StartsWith("瀑练") _
            Then
                Return "pu"
            End If

            Return "bao"
        End If

        If "弹".Equals(sTxt) Then
            If sTmpL.EndsWith("子弹") OrElse sTmpL.EndsWith("枪弹") OrElse sTmpL.EndsWith("氢弹") _
               OrElse sTmpL.EndsWith("导弹") OrElse sTmpL.EndsWith("手榴弹") OrElse sTmpL.EndsWith("原子弹") _
               OrElse sTmpL.EndsWith("中子弹") OrElse sTmpL.EndsWith("左挟弹") OrElse sTmpL.EndsWith("弓弹") _
               OrElse sTmpL.EndsWith("凫弹") OrElse sTmpL.EndsWith("援弹") OrElse sTmpL.EndsWith("炸弹") _
               OrElse sTmpL.EndsWith("燃烧弹") OrElse sTmpL.EndsWith("烟幕弹") OrElse sTmpL.EndsWith("催泪弹") _
               OrElse sTmpL.EndsWith("炮弹") OrElse sTmpL.EndsWith("火箭弹") OrElse sTmpL.EndsWith("榴弹") _
               OrElse sTmpL.EndsWith("信号弹") OrElse sTmpL.EndsWith("曳光弹") OrElse sTmpL.EndsWith("实弹") _
               OrElse sTmpL.EndsWith("核弹") OrElse sTmpL.EndsWith("照明弹") OrElse sTmpL.EndsWith("柘弹") _
               OrElse sTmpL.EndsWith("中弹") OrElse sTmpL.EndsWith("母弹") OrElse sTmpL.EndsWith("掷弹") _
               OrElse sTmpL.EndsWith("珠弹") OrElse sTmpL.EndsWith("汽油弹") OrElse sTmpL.EndsWith("防弹") _
               Then
                Return "dan"
            End If
            If sTmpR.StartsWith("弹丸") OrElse sTmpR.StartsWith("弹雨") OrElse sTmpR.StartsWith("弹子涡") _
               OrElse sTmpR.StartsWith("弹弓") OrElse sTmpR.StartsWith("弹药") OrElse sTmpR.StartsWith("弹道") _
               OrElse sTmpR.StartsWith("弹头") OrElse sTmpR.StartsWith("弹夹") OrElse sTmpR.StartsWith("弹尽粮绝") _
               OrElse sTmpR.StartsWith("弹尽援绝") OrElse sTmpR.StartsWith("弹壳") OrElse sTmpR.StartsWith("弹片") _
               OrElse sTmpR.StartsWith("弹体") OrElse sTmpR.StartsWith("弹筒") OrElse sTmpR.StartsWith("弹底") _
               OrElse sTmpR.StartsWith("弹种") OrElse sTmpR.StartsWith("弹无虚发") OrElse sTmpR.StartsWith("弹子") _
            Then
                Return "dan"
            End If

            Return "tan"
        End If
        If "娜".Equals(sTxt) Then
            If sTmpL.EndsWith("婀娜") OrElse sTmpL.EndsWith("袅娜") Then
                Return "nuo"
            End If
            Return "na"
        End If
        If "绿".Equals(sTxt) Then
            If sTmpL.EndsWith("河出绿") OrElse sTmpL.EndsWith("鸭绿") Then
                Return "lu"
            End If
            If sTmpR.StartsWith("绿林") OrElse sTmpR.StartsWith("绿营") OrElse sTmpR.StartsWith("绿营") Then
                Return "lu"
            End If
            Return "lv"
        End If

        If "纶".Equals(sTxt) Then
            If sTmpR.StartsWith("纶巾") OrElse sTmpR.StartsWith("纶羽") OrElse sTmpR.StartsWith("纶布") Then
                Return "gan"
            End If
            Return "lun"
        End If

        If "陆".Equals(sTxt) Then
            Return "lu"
        End If
        If "熟".Equals(sTxt) Then
            Return "shu"
        End If

        If "落".Equals(sTxt) Then
            If sTmpL.EndsWith("丢三落") Then
                Return "la"
            End If
            If sTmpR.StartsWith("落课") OrElse sTmpR.StartsWith("落家") Then
                Return "la"
            End If

            If sTmpL.EndsWith("莲花落") OrElse sTmpL.EndsWith("落褒贬") OrElse sTmpL.EndsWith("落亏欠") _
               OrElse sTmpL.EndsWith("落枕") OrElse sTmpL.EndsWith("落炕") OrElse sTmpL.EndsWith("落儿") _
               Then
                Return "lao"
            End If
            If sTmpR.StartsWith("落子馆") OrElse sTmpR.StartsWith("落儿") OrElse sTmpR.StartsWith("落炕") _
               OrElse sTmpR.StartsWith("落枕") OrElse sTmpR.StartsWith("落褒贬") OrElse sTmpR.StartsWith("落亏欠") _
               OrElse sTmpR.StartsWith("落子") OrElse sTmpR.StartsWith("落价") OrElse sTmpR.StartsWith("落架") _
               OrElse sTmpR.StartsWith("落色") OrElse sTmpR.StartsWith("落头") _
            Then
                Return "lao"
            End If

            Return "luo"
        End If

        If "屯".Equals(sTxt) Then
            If sTmpR.StartsWith("屯穷") OrElse sTmpR.StartsWith("屯邅") OrElse sTmpR.StartsWith("屯蹇") _
               OrElse sTmpR.StartsWith("屯謇") OrElse sTmpR.StartsWith("屯蹶") OrElse sTmpR.StartsWith("屯钝") _
               OrElse sTmpR.StartsWith("屯闵") OrElse sTmpR.StartsWith("屯其膏") OrElse sTmpR.StartsWith("屯膏") _
            Then
                Return "zhun"
            End If

            Return "tun"
        End If
        If "涌".Equals(sTxt) Then
            Return "yong"
        End If
        If "暴".Equals(sTxt) Then
            Return "bao"
        End If
        If "祝".Equals(sTxt) Then
            Return "zhu"
        End If

        If "校".Equals(sTxt) Then
            If sTmpL.EndsWith("学校") OrElse sTmpL.EndsWith("母校") Then
                Return "xiao"
            End If

            If sTmpL.EndsWith("屦校") OrElse sTmpL.EndsWith("何校") OrElse sTmpL.EndsWith("成校") _
               OrElse sTmpL.EndsWith("实校") Then
                Return "jiao"
            End If
            If sTmpR.StartsWith("校场") OrElse sTmpR.StartsWith("校勘") OrElse sTmpR.StartsWith("校订") _
               OrElse sTmpR.StartsWith("校对") OrElse sTmpR.StartsWith("校重牢") OrElse sTmpR.StartsWith("校猎") _
               OrElse sTmpR.StartsWith("校样") OrElse sTmpR.StartsWith("校人") OrElse sTmpR.StartsWith("校大夫") _
               OrElse sTmpR.StartsWith("校稿") OrElse sTmpR.StartsWith("校书") OrElse sTmpR.StartsWith("校理") _
               OrElse sTmpR.StartsWith("校缀") OrElse sTmpR.StartsWith("校武") OrElse sTmpR.StartsWith("校武") _
               OrElse sTmpR.StartsWith("校棋") OrElse sTmpR.StartsWith("校怨") OrElse sTmpR.StartsWith("校计") _
               OrElse sTmpR.StartsWith("校竞") OrElse sTmpR.StartsWith("校短推长") OrElse sTmpR.StartsWith("校饰") _
               OrElse sTmpR.StartsWith("校具") OrElse sTmpR.StartsWith("校体") OrElse sTmpR.StartsWith("校计") _
               OrElse sTmpR.StartsWith("校测") OrElse sTmpR.StartsWith("校点") OrElse sTmpR.StartsWith("校改") _
               OrElse sTmpR.StartsWith("校核") OrElse sTmpR.StartsWith("校验") OrElse sTmpR.StartsWith("校样") _
               OrElse sTmpR.StartsWith("校椅") OrElse sTmpR.StartsWith("校阅") OrElse sTmpR.StartsWith("校注") _
               OrElse sTmpR.StartsWith("校准") _
            Then
                Return "jiao"
            End If

            Return "xiao"
        End If
        If "呷".Equals(sTxt) Then
            If sTmpL.EndsWith("呷呷") OrElse sTmpR.StartsWith("呷呷") Then
                Return "ga"
            End If
            Return "xia"
        End If

        If "拗".Equals(sTxt) Then
            If sTmpL.EndsWith("执拗") OrElse sTmpL.EndsWith("脾气很拗") OrElse sTmpL.EndsWith("脾气拗") Then
                Return "niu"
            End If
            If sTmpR.StartsWith("拗逆") OrElse sTmpR.StartsWith("拗别") OrElse sTmpR.StartsWith("拗彆") _
               OrElse sTmpR.StartsWith("拗性") OrElse sTmpR.StartsWith("拗执") OrElse sTmpR.StartsWith("拗强") _
               OrElse sTmpR.StartsWith("拗木枕") OrElse sTmpR.StartsWith("拗项") OrElse sTmpR.StartsWith("拗转") _
               OrElse sTmpR.StartsWith("拗捩") OrElse sTmpR.StartsWith("拗不过") OrElse sTmpR.StartsWith("拗劲") _
            Then
                Return "niu"
            End If

            Return "ao"
        End If

        If "弄".Equals(sTxt) Then
            If sTmpR.StartsWith("弄堂") Then
                Return "long"
            End If

            Return "nong"
        End If

        If "盛".Equals(sTxt) Then
            If sTmpR.StartsWith("盛饭") OrElse sTmpR.StartsWith("盛水") OrElse sTmpR.StartsWith("盛器") Then
                Return "cheng"
            End If

            Return "sheng"
        End If
        If "忒".Equals(sTxt) Then
            If sTmpL.EndsWith("差忒") Then
                Return "te"
            End If

            Return "tui"
        End If
        If "汤".Equals(sTxt) Then
            Return "tang"
        End If
        If "旁".Equals(sTxt) Then
            Return "pang"
        End If
        If "吱".Equals(sTxt) Then
            Return "zhi"
        End If
        If "胺".Equals(sTxt) Then
            Return "an"
        End If
        If "臂".Equals(sTxt) Then
            Return "bi"
        End If
        If "虫".Equals(sTxt) Then
            Return "chong"
        End If
        If "卜".Equals(sTxt) Then
            If sTmpL.EndsWith("萝卜") Then
                Return "bo"
            End If
            Return "bu"
        End If
        If "蚌".Equals(sTxt) Then
            If sTmpR.StartsWith("蚌埠") Then
                Return "beng"
            End If
            Return "bang"
        End If

        If "仔".Equals(sTxt) Then
            If sTmpR.StartsWith("仔细") OrElse sTmpR.StartsWith("仔畜") OrElse sTmpR.StartsWith("仔猪") _
               OrElse sTmpR.StartsWith("仔鸡") OrElse sTmpR.StartsWith("仔兽") OrElse sTmpR.StartsWith("仔肩") _
               OrElse sTmpR.StartsWith("仔密") OrElse sTmpR.StartsWith("仔鸭") OrElse sTmpR.StartsWith("仔鱼") _
               Then
                Return "zi"
            End If

            Return "zai"
        End If
        If "辟".Equals(sTxt) Then
            If sTmpR.StartsWith("辟言") OrElse sTmpR.StartsWith("辟邪") Then
                Return "bi"
            End If
            If sTmpL.EndsWith("复辟") OrElse sTmpR.StartsWith("厥辟") Then
                Return "bi"
            End If

            Return "pi"
        End If

        If "剥".Equals(sTxt) Then
            If sTmpR.StartsWith("剥皮") OrElse sTmpR.StartsWith("剥花生") OrElse sTmpR.StartsWith("剥碗豆") _
               OrElse sTmpR.StartsWith("剥牛皮") OrElse sTmpR.StartsWith("剥葱") OrElse sTmpR.StartsWith("剥壳") _
               Then
                Return "bao"
            End If

            Return "bo"
        End If

        If "泊".Equals(sTxt) Then
            If sTmpL.EndsWith("湖泊") OrElse sTmpR.StartsWith("水泊") OrElse sTmpR.StartsWith("血泊") _
               OrElse sTmpL.EndsWith("梁山泊") OrElse sTmpR.StartsWith("罗布泊") _
            Then
                Return "po"
            End If
            If sTmpR.StartsWith("泊子") OrElse sTmpR.StartsWith("泊洑") OrElse sTmpR.StartsWith("泊地") Then
                Return "po"
            End If

            Return "bo"
        End If

        If "贲".Equals(sTxt) Then
            If sTmpR.StartsWith("贲如濡如") OrElse sTmpR.StartsWith("贲华") OrElse sTmpR.StartsWith("贲赍") _
               OrElse sTmpR.StartsWith("贲然") OrElse sTmpR.StartsWith("贲临") OrElse sTmpR.StartsWith("贲卦") _
            Then
                Return "bi"
            End If

            Return "ben"
        End If
        If "嗄".Equals(sTxt) Then
            If sTmpL.EndsWith("嗌不嗄") Then
                Return "sha"
            End If
            If sTmpR.StartsWith("嗄哑") OrElse sTmpR.StartsWith("嗄嘶") OrElse sTmpR.StartsWith("嗄法") _
            Then
                Return "sha"
            End If

            Return "a"
        End If
        If "裨".Equals(sTxt) Then
            If sTmpL.EndsWith("偏裨") Then
                Return "pi"
            End If
            If sTmpR.StartsWith("裨冕") OrElse sTmpR.StartsWith("裨衣") OrElse sTmpR.StartsWith("裨师") _
               OrElse sTmpR.StartsWith("裨海") OrElse sTmpR.StartsWith("裨王") OrElse sTmpR.StartsWith("裨将") _
            Then
                Return "pi"
            End If

            Return "bi"
        End If
        If "扳".Equals(sTxt) Then
            If sTmpR.StartsWith("扳援") OrElse sTmpR.StartsWith("扳缘") OrElse sTmpR.StartsWith("扳陟") _
               OrElse sTmpR.StartsWith("扳跻") OrElse sTmpR.StartsWith("扳附") OrElse sTmpR.StartsWith("扳亲") _
               OrElse sTmpR.StartsWith("扳联") OrElse sTmpR.StartsWith("扳高") OrElse sTmpR.StartsWith("扳龙") _
               OrElse sTmpR.StartsWith("扳害") OrElse sTmpR.StartsWith("扳脏") OrElse sTmpR.StartsWith("扳连") _
               OrElse sTmpR.StartsWith("扳缠") OrElse sTmpR.StartsWith("扳蔓") OrElse sTmpR.StartsWith("扳差头") _
               OrElse sTmpR.StartsWith("扳厚") OrElse sTmpR.StartsWith("扳话") OrElse sTmpR.StartsWith("扳谈") _
            Then
                Return "pan"
            End If

            Return "ban"
        End If
        If "趵".Equals(sTxt) Then
            If sTmpL.EndsWith("趵趵") Then
                Return "bo"
            End If
            If sTmpR.StartsWith("趵趵") Then
                Return "bo"
            End If

            Return "bao"
        End If
        If "鲅".Equals(sTxt) Then
            If sTmpL.EndsWith("鲅鲅") Then
                Return "bo"
            End If
            If sTmpR.StartsWith("鲅鲅") Then
                Return "bo"
            End If

            Return "ba"
        End If
        If "扒".Equals(sTxt) Then
            If sTmpR.StartsWith("扒坑") OrElse sTmpR.StartsWith("扒开") OrElse sTmpR.StartsWith("扒土") _
               OrElse sTmpR.StartsWith("扒堤") OrElse sTmpR.StartsWith("扒车") OrElse sTmpR.StartsWith("扒得高") _
               OrElse sTmpR.StartsWith("扒了旧房") OrElse sTmpR.StartsWith("扒下来") OrElse sTmpR.StartsWith("扒钉") _
               OrElse sTmpR.StartsWith("扒拉") OrElse sTmpR.StartsWith("扒墙") OrElse sTmpR.StartsWith("扒皮") _
            Then
                Return "ba"
            End If

            Return "pa"
        End If
        If "亡".Equals(sTxt) Then
            If sTmpL.EndsWith("日知其所亡") Then
                Return "wu"
            End If

            If sTmpR.StartsWith("亡论长者") OrElse sTmpR.StartsWith("亡以") OrElse sTmpR.StartsWith("亡此") _
               OrElse sTmpR.StartsWith("亡则") OrElse sTmpR.StartsWith("亡人之地") OrElse sTmpR.StartsWith("亡罪") _
               OrElse sTmpR.StartsWith("亡阻我") OrElse sTmpR.StartsWith("亡论") OrElse sTmpR.StartsWith("亡常") _
               OrElse sTmpR.StartsWith("亡何国变") _
            Then
                Return "wu"
            End If

            Return "wang"
        End If
        If "碌".Equals(sTxt) Then
            If sTmpR.StartsWith("碌碡") OrElse sTmpR.StartsWith("碌轴") Then
                Return "liu"
            End If

            Return "lu"
        End If
        If "蛇".Equals(sTxt) Then
            If sTmpL.EndsWith("委蛇") Then
                Return "yi"
            End If

            Return "she"
        End If
        If "厌".Equals(sTxt) Then
            Return "yan"
        End If
        If "粥".Equals(sTxt) Then
            Return "zhou"
        End If
        If "露".Equals(sTxt) Then
            If sTmpL.EndsWith("泄露") OrElse sTmpL.EndsWith("败露") Then
                Return "lou"
            End If

            If sTmpR.StartsWith("露刃") OrElse sTmpR.StartsWith("露光") OrElse sTmpR.StartsWith("露相") _
               OrElse sTmpR.StartsWith("露白") OrElse sTmpR.StartsWith("露于外") OrElse sTmpR.StartsWith("露丑") _
               OrElse sTmpR.StartsWith("露出") OrElse sTmpR.StartsWith("露底") OrElse sTmpR.StartsWith("露风") _
               OrElse sTmpR.StartsWith("露富") OrElse sTmpR.StartsWith("露脸") OrElse sTmpR.StartsWith("露马脚") _
               OrElse sTmpR.StartsWith("露面") OrElse sTmpR.StartsWith("露苗") OrElse sTmpR.StartsWith("露怯") _
               OrElse sTmpR.StartsWith("露头") OrElse sTmpR.StartsWith("露馅") OrElse sTmpR.StartsWith("露相") _
               OrElse sTmpR.StartsWith("露一手") _
            Then
                Return "lou"
            End If

            Return "lu"
        End If
        If "削".Equals(sTxt) Then
            If sTmpL.EndsWith("辩智而鲁削") OrElse sTmpL.EndsWith("兵挫地削") OrElse sTmpL.EndsWith("楚日以削") _
               OrElse sTmpL.EndsWith("石崖侧削") OrElse sTmpL.EndsWith("剥削") OrElse sTmpL.EndsWith("瘦削") _
            Then
                Return "xue"
            End If

            If sTmpR.StartsWith("削弱") OrElse sTmpR.StartsWith("削减") OrElse sTmpR.StartsWith("削月割") _
               OrElse sTmpR.StartsWith("削壁") OrElse sTmpR.StartsWith("削发") OrElse sTmpR.StartsWith("削减") _
               OrElse sTmpR.StartsWith("削价") OrElse sTmpR.StartsWith("削肩") OrElse sTmpR.StartsWith("削铁如泥") _
               OrElse sTmpR.StartsWith("削足") Then
                Return "xue"
            End If

            Return "xiao"
        End If
        If "曾".Equals(sTxt) Then
            If sTmpL.EndsWith("不曾") OrElse sTmpL.EndsWith("未曾") OrElse sTmpL.EndsWith("似曾") _
               OrElse sTmpL.EndsWith("何曾") _
            Then
                Return "ceng"
            End If

            If sTmpR.StartsWith("曾谙") OrElse sTmpR.StartsWith("曾住") OrElse sTmpR.StartsWith("曾不") _
               OrElse sTmpR.StartsWith("曾见") OrElse sTmpR.StartsWith("曾去") OrElse sTmpR.StartsWith("曾薮") _
               OrElse sTmpR.StartsWith("曾架") OrElse sTmpR.StartsWith("曾云") OrElse sTmpR.StartsWith("曾几") _
               OrElse sTmpR.StartsWith("曾经") Then
                Return "ceng"
            End If

            Return "zeng"
        End If
        If "朝".Equals(sTxt) Then
            If sTmpL.EndsWith("今朝") OrElse sTmpL.EndsWith("明朝") OrElse sTmpL.EndsWith("一朝") _
            Then
                Return "zhao"
            End If

            If sTmpR.StartsWith("朝阳") OrElse sTmpR.StartsWith("朝晖") OrElse sTmpR.StartsWith("朝暮") _
               OrElse sTmpR.StartsWith("朝霞") OrElse sTmpR.StartsWith("朝气") OrElse sTmpR.StartsWith("朝思暮想") _
               OrElse sTmpR.StartsWith("朝令夕改") OrElse sTmpR.StartsWith("朝秦暮楚") OrElse sTmpR.StartsWith("朝至") _
               OrElse sTmpR.StartsWith("朝夕") OrElse sTmpR.StartsWith("朝发") OrElse sTmpR.StartsWith("朝露") _
               OrElse sTmpR.StartsWith("朝雨") OrElse sTmpR.StartsWith("朝歌") OrElse sTmpR.StartsWith("朝雉") _
               OrElse sTmpR.StartsWith("朝趁") OrElse sTmpR.StartsWith("朝日") OrElse sTmpR.StartsWith("朝旦") _
               OrElse sTmpR.StartsWith("朝不及夕") OrElse sTmpR.StartsWith("朝升暮合") OrElse sTmpR.StartsWith("朝成") _
               OrElse sTmpR.StartsWith("朝夷") OrElse sTmpR.StartsWith("朝欢") OrElse sTmpR.StartsWith("朝市") _
               OrElse sTmpR.StartsWith("朝舗") OrElse sTmpR.StartsWith("朝旦") OrElse sTmpR.StartsWith("朝昔") _
               OrElse sTmpR.StartsWith("朝昼") OrElse sTmpR.StartsWith("朝居") OrElse sTmpR.StartsWith("朝菌") _
               OrElse sTmpR.StartsWith("朝三暮四") OrElse sTmpR.StartsWith("朝生暮死") OrElse sTmpR.StartsWith("朝思暮想") _
               OrElse sTmpR.StartsWith("朝闻夕改") OrElse sTmpR.StartsWith("朝及") Then
                Return "zhao"
            End If

            Return "chao"
        End If
        If "磅".Equals(sTxt) Then
            If sTmpL.EndsWith("磅磅") Then
                Return "pang"
            End If

            If sTmpR.StartsWith("磅磅") OrElse sTmpR.StartsWith("磅礴") Then
                Return "pang"
            End If

            Return "bang"
        End If
        If "刹".Equals(sTxt) Then
            If sTmpL.EndsWith("古刹") OrElse sTmpL.EndsWith("宝刹") Then
                Return "cha"
            End If

            If sTmpR.StartsWith("刹多罗") OrElse sTmpR.StartsWith("刹土") OrElse sTmpR.StartsWith("刹寺") _
               OrElse sTmpR.StartsWith("刹那") OrElse sTmpR.StartsWith("刹时") Then
                Return "cha"
            End If

            Return "sha"
        End If
        If "乘".Equals(sTxt) Then
            If sTmpL.EndsWith("公车千乘") OrElse sTmpL.EndsWith("路车乘") OrElse sTmpL.EndsWith("马十乘") _
                OrElse sTmpL.EndsWith("千余乘") OrElse sTmpL.EndsWith("史乘") Then
                Return "sheng"
            End If

            If sTmpR.StartsWith("乘之国") OrElse sTmpR.StartsWith("乘矢") OrElse sTmpR.StartsWith("乘壶") _
               OrElse sTmpR.StartsWith("乘舆") OrElse sTmpR.StartsWith("野乘") Then
                Return "sheng"
            End If

            Return "cheng"
        End If
        If "陂".Equals(sTxt) Then
            If sTmpL.EndsWith("黄陂") Then
                Return "pi"
            End If

            If sTmpR.StartsWith("陂陀") Then
                Return "po"
            End If

            Return "bei"
        End If
        If "槎".Equals(sTxt) Then
            If sTmpR.StartsWith("槎蘖") OrElse sTmpR.StartsWith("槎山") OrElse sTmpR.StartsWith("槎孽") Then
                Return "zha"
            End If

            Return "cha"
        End If
        If "屏".Equals(sTxt) Then
            If sTmpR.StartsWith("屏除") OrElse sTmpR.StartsWith("屏弃") OrElse sTmpR.StartsWith("屏斥") _
               OrElse sTmpR.StartsWith("屏退") OrElse sTmpR.StartsWith("屏气") OrElse sTmpR.StartsWith("屏息") _
               OrElse sTmpR.StartsWith("屏居") OrElse sTmpR.StartsWith("屏语") OrElse sTmpR.StartsWith("屏伏") _
               OrElse sTmpR.StartsWith("屏璧") OrElse sTmpR.StartsWith("屏匿") OrElse sTmpR.StartsWith("屏迹") _
               OrElse sTmpR.StartsWith("屏藏") OrElse sTmpR.StartsWith("屏绝") OrElse sTmpR.StartsWith("屏王") _
               OrElse sTmpR.StartsWith("屏处") OrElse sTmpR.StartsWith("屏遮") _
               OrElse sTmpR.StartsWith("屏声") OrElse sTmpR.StartsWith("屏营") OrElse sTmpR.StartsWith("屏人") Then
                Return "bing"
            End If

            Return "ping"
        End If
        If "禅".Equals(sTxt) Then
            If sTmpL.EndsWith("受禅") OrElse sTmpL.EndsWith("相禅") OrElse sTmpL.EndsWith("封禅") Then
                Return "shan"
            End If

            If sTmpR.StartsWith("禅位") OrElse sTmpR.StartsWith("禅五世") OrElse sTmpR.StartsWith("禅文") _
               OrElse sTmpR.StartsWith("禅诰") OrElse sTmpR.StartsWith("禅之") OrElse sTmpR.StartsWith("禅代") _
               OrElse sTmpR.StartsWith("禅让") _
               OrElse sTmpR.StartsWith("禅变") OrElse sTmpR.StartsWith("禅化") OrElse sTmpR.StartsWith("禅其") Then
                Return "shan"
            End If

            Return "chan"
        End If
        If "燥".Equals(sTxt) Then
            Return "zao"
        End If

        If "呗".Equals(sTxt) Then
            If sTmpL.EndsWith("呗") AndAlso text.EndsWith("呗") Then
                Return "bei"
            End If
            If sTmpL.EndsWith("梵呗") Then
                Return "bai"
            End If

            If sTmpR.StartsWith("呗唱") OrElse sTmpR.StartsWith("呗佛") OrElse sTmpR.StartsWith("呗音") _
               OrElse sTmpR.StartsWith("呗唱") OrElse sTmpR.StartsWith("呗偈") OrElse sTmpR.StartsWith("呗声") _
               OrElse sTmpR.StartsWith("呗赞") Then
                Return "bai"
            End If

            Return "bei"
        End If
        If "芥".Equals(sTxt) Then
            Return "jie"
        End If
        If "奸".Equals(sTxt) Then
            Return "jian"
        End If
        If "柴".Equals(sTxt) Then
            Return "chai"
        End If
        If "俶".Equals(sTxt) Then
            Return "chu"
        End If
        If "伴".Equals(sTxt) Then
            Return "ban"
        End If
        If "栟".Equals(sTxt) Then
            If sTmpR.StartsWith("栟茶") Then
                Return "ben"
            End If

            Return "bing"
        End If
        If "秘".Equals(sTxt) Then
            If sTmpR.StartsWith("秘鲁") Then
                Return "bi"
            End If

            Return "mi"
        End If
        If "嗒".Equals(sTxt) Then
            If sTmpR.StartsWith("嗒丧") OrElse sTmpR.StartsWith("嗒然") OrElse sTmpR.StartsWith("嗒嗒若失") _
               OrElse sTmpR.StartsWith("嗒若失") Then
                Return "ta"
            End If

            Return "da"
        End If
        If "吡".Equals(sTxt) Then
            If sTmpR.StartsWith("吡啶") Then
                Return "bi"
            End If

            Return "pi"
        End If
        If "铛".Equals(sTxt) Then
            If sTmpL.EndsWith("酒铛") OrElse sTmpL.EndsWith("茶铛") OrElse sTmpL.EndsWith("药铛") _
               OrElse sTmpL.EndsWith("鼎铛") Then
                Return "cheng"
            End If
            If sTmpR.StartsWith("铛头") Then
                Return "cheng"
            End If

            Return "dang"
        End If
        If "钿".Equals(sTxt) Then
            If sTmpL.EndsWith("铜钿") OrElse sTmpL.EndsWith("洋钿") OrElse sTmpL.EndsWith("车钿") _
               OrElse sTmpL.EndsWith("几多钿") OrElse sTmpL.EndsWith("几钿") OrElse sTmpL.EndsWith("花钿") Then
                Return "tian"
            End If
            If sTmpR.StartsWith("钿晕罗衫色似烟") OrElse sTmpR.StartsWith("钿朵") OrElse sTmpR.StartsWith("钿钗") _
               OrElse sTmpR.StartsWith("钿璎") OrElse sTmpR.StartsWith("钿波") OrElse sTmpR.StartsWith("钿黛") _
               OrElse sTmpR.StartsWith("钿蝉") OrElse sTmpR.StartsWith("钿窝") OrElse sTmpR.StartsWith("钿头") _
            Then
                Return "tian"
            End If

            Return "dian"
        End If
        If "堕".Equals(sTxt) Then
            If sTmpR.StartsWith("堕成") OrElse sTmpR.StartsWith("堕业") OrElse sTmpR.StartsWith("堕废") _
               OrElse sTmpR.StartsWith("堕事") OrElse sTmpR.StartsWith("堕圮") OrElse sTmpR.StartsWith("堕泥") _
               OrElse sTmpR.StartsWith("堕域") OrElse sTmpR.StartsWith("堕突") _
            Then
                Return "hui"
            End If

            Return "duo"
        End If
        If "坻".Equals(sTxt) Then
            If sTmpR.StartsWith("坻崿") OrElse sTmpL.EndsWith("得坻") OrElse sTmpL.EndsWith("小沚曰坻") OrElse sTmpL.EndsWith("水中坻") Then
                Return "chi"
            End If

            Return "di"
        End If
        If "惮".Equals(sTxt) Then
            If sTmpR.StartsWith("惮赫") Then
                Return "da"
            End If

            Return "dan"
        End If
        If "龟".Equals(sTxt) Then
            If sTmpR.StartsWith("龟裂") OrElse sTmpR.StartsWith("龟手") OrElse sTmpR.StartsWith("龟坼") Then
                Return "jun"
            End If
            If sTmpR.StartsWith("龟兹") Then
                Return "qiu"
            End If

            Return "gui"
        End If

        If "盖".Equals(sTxt) Then
            If sTmpR.StartsWith("盖邑") Then
                Return "ge"
            End If
            Return "gai"
        End If
        If "臭".Equals(sTxt) Then
            Return "chou"
        End If
        If "芾".Equals(sTxt) Then
            If sTmpL.EndsWith("蔽芾") Then
                Return "fei"
            End If
            Return "fu"
        End If
        If "蕃".Equals(sTxt) Then
            If sTmpL.EndsWith("吐蕃") Then
                Return "bo"
            End If
            Return "fan"
        End If
        If "繁".Equals(sTxt) Then
            If sTmpR.StartsWith("繁台") OrElse sTmpR.StartsWith("繁驵驱之") Then
                Return "po"
            End If
            Return "fan"
        End If
        If "拾".Equals(sTxt) Then
            If sTmpR.StartsWith("拾级") Then
                Return "she"
            End If
            Return "shi"
        End If
        If "吓".Equals(sTxt) Then
            If sTmpL.EndsWith("恐吓") OrElse sTmpL.EndsWith("恫吓") Then
                Return "he"
            End If
            If sTmpR.StartsWith("吓骗") OrElse sTmpR.StartsWith("吓诈") Then
                Return "he"
            End If
            Return "xia"
        End If
        If "邪".Equals(sTxt) Then
            Return "xie"
        End If
        If "洗".Equals(sTxt) Then
            Return "xi"
        End If
        If "雀".Equals(sTxt) Then
            If sTmpR.StartsWith("雀盲眼") Then
                Return "qiao"
            End If
            Return "que"
        End If
        If "宿".Equals(sTxt) Then
            If sTmpL.EndsWith("一宿") OrElse sTmpL.EndsWith("两宿") OrElse sTmpL.EndsWith("星宿") Then
                Return "xiu"
            End If
            Return "su"
        End If
        If "俩".Equals(sTxt) Then
            If sTmpL.EndsWith("伎俩") Then
                Return "liang"
            End If
            Return "lia"
        End If
        If "纤".Equals(sTxt) Then
            If sTmpR.StartsWith("纤夫") OrElse sTmpR.StartsWith("纤道") OrElse sTmpR.StartsWith("纤路") _
               OrElse sTmpR.StartsWith("纤绳") OrElse sTmpR.StartsWith("纤手") _
               Then
                Return "qian"
            End If
            Return "xian"
        End If
        If "腊".Equals(sTxt) Then
            If sTmpR.StartsWith("腊田") OrElse sTmpR.StartsWith("腊之以为饵") Then
                Return "xi"
            End If
            Return "la"
        End If
        If "呵".Equals(sTxt) Then
            If sTmpR.StartsWith("呵腰") Then
                Return "ha"
            End If
            If sTmpR.StartsWith("呵叻") OrElse sTmpR.StartsWith("呵罗单") Then
                Return "ke"
            End If
            Return "he"
        End If

        If "蜡".Equals(sTxt) Then
            If sTmpR.StartsWith("蜡腊") OrElse sTmpR.StartsWith("蜡坛") OrElse sTmpR.StartsWith("蜡祭") _
               OrElse sTmpR.StartsWith("蜡宾") OrElse sTmpR.StartsWith("蜡索") OrElse sTmpR.StartsWith("蜡祠") _
               OrElse sTmpR.StartsWith("蜡宫") OrElse sTmpR.StartsWith("蜡月") OrElse sTmpR.StartsWith("蜡日") _
            Then
                Return "zha"
            End If
            Return "la"
        End If
        If "孛".Equals(sTxt) Then
            Return "bei"
        End If
        If "椎".Equals(sTxt) Then
            If sTmpL.EndsWith("脊椎") OrElse sTmpL.EndsWith("颈椎") OrElse sTmpL.EndsWith("胸椎") _
               OrElse sTmpL.EndsWith("尾椎") OrElse sTmpL.EndsWith("脊节谓之椎") OrElse sTmpL.EndsWith("腰椎") _
               OrElse sTmpL.EndsWith("骶椎") _
            Then
                Return "zhui"
            End If
            If sTmpR.StartsWith("椎骨") OrElse sTmpR.StartsWith("椎下间主胸中热") OrElse sTmpR.StartsWith("椎间盘") _
               OrElse sTmpR.StartsWith("椎体") _
            Then
                Return "zhui"
            End If
            Return "chui"
        End If
        If "柜".Equals(sTxt) Then
            If sTmpR.StartsWith("柜柳") Then
                Return "ju"
            End If
            Return "gui"
        End If
        If "咯".Equals(sTxt) Then
            If sTmpL.EndsWith("吡咯") Then
                Return "luo"
            End If
            If sTmpR.StartsWith("咯血") OrElse sTmpR.StartsWith("咯痰") OrElse sTmpR.StartsWith("咯出来") _
            Then
                Return "ka"
            End If
            Return "ge"
        End If
        If "骠".Equals(sTxt) Then
            If sTmpR.StartsWith("骠马") Then
                Return "biao"
            End If
            Return "piao"
        End If
        If "钥".Equals(sTxt) Then
            Return "yao"
        End If
        If "卷".Equals(sTxt) Then
            If sTmpR.StartsWith("卷娄") OrElse sTmpR.StartsWith("卷曲") OrElse sTmpR.StartsWith("卷陲") _
               OrElse sTmpR.StartsWith("卷屈") OrElse sTmpR.StartsWith("卷舒") OrElse sTmpR.StartsWith("卷缩") _
               OrElse sTmpR.StartsWith("卷然") Then
                Return "quan"
            End If
            Return "juan"
        End If
        If "拌".Equals(sTxt) Then
            If sTmpR.StartsWith("拌命") OrElse sTmpR.StartsWith("拌舍") OrElse sTmpR.StartsWith("拌娇") _
               OrElse sTmpR.StartsWith("拌蚌") OrElse sTmpR.StartsWith("拌花") OrElse sTmpR.StartsWith("拌数十年之力") _
            Then
                Return "pan"
            End If
            Return "ban"
        End If
        If "荤".Equals(sTxt) Then
            If sTmpR.StartsWith("荤粥") Then
                Return "xun"
            End If
            Return "hun"
        End If
        If "冯".Equals(sTxt) Then
            If sTmpR.StartsWith("冯弱犯寡") OrElse sTmpR.StartsWith("冯戎") OrElse sTmpR.StartsWith("冯怒") _
               OrElse sTmpR.StartsWith("冯隆") OrElse sTmpR.StartsWith("冯河") OrElse sTmpR.StartsWith("冯翼") _
               OrElse sTmpR.StartsWith("冯依") OrElse sTmpR.StartsWith("冯神") OrElse sTmpR.StartsWith("冯太一") _
               OrElse sTmpR.StartsWith("冯恃其众") OrElse sTmpR.StartsWith("冯尸") OrElse sTmpR.StartsWith("冯资") _
            Then
                Return "ping"
            End If
            Return "feng"
        End If
        If "荠".Equals(sTxt) Then
            If sTmpL.EndsWith("荸荠") Then
                Return "qi"
            End If
            Return "ji"
        End If
        If "潭".Equals(sTxt) Then
            Return "tan"
        End If
        If "褊".Equals(sTxt) Then
            Return "bian"
        End If
        If "睢".Equals(sTxt) Then
            If sTmpR.StartsWith("睢盱") Then
                Return "hui"
            End If
            Return "sui"
        End If
        If "尾".Equals(sTxt) Then
            If sTmpL.EndsWith("马尾") AndAlso sTmpR.StartsWith("尾罗") Then
                Return "yi"
            End If
            If sTmpL.EndsWith("三尾") AndAlso sTmpR.StartsWith("尾儿") Then
                Return "yi"
            End If
            Return "wei"
        End If
        If "苴".Equals(sTxt) Then
            If sTmpL.EndsWith("如彼栖苴") Then
                Return "cha"
            End If
            If sTmpR.StartsWith("苴稭") Then
                Return "zu"
            End If
            Return "ju"
        End If
        If "陌".Equals(sTxt) Then
            Return "mo"
        End If
        If "犍".Equals(sTxt) Then
            If sTmpR.StartsWith("犍为") Then
                Return "qian"
            End If
            Return "jian"
        End If
        If "剿".Equals(sTxt) Then
            If sTmpR.StartsWith("剿拾") OrElse sTmpR.StartsWith("剿袭") OrElse sTmpR.StartsWith("剿说") _
            Then
                Return "chao"
            End If
            Return "jiao"
        End If
        If "藉".Equals(sTxt) Then
            If sTmpL.EndsWith("死者相藉") OrElse sTmpL.EndsWith("以草荐地而坐曰藉") OrElse sTmpL.EndsWith("凌藉") _
               OrElse sTmpL.EndsWith("白头无籍") OrElse sTmpL.EndsWith("慰藉") OrElse sTmpL.EndsWith("枕藉") _
               OrElse sTmpL.EndsWith("蕴藉") _
            Then
                Return "jie"
            End If
            If sTmpR.StartsWith("藉茅") OrElse sTmpR.StartsWith("藉草枕块") OrElse sTmpR.StartsWith("藉子") _
               OrElse sTmpR.StartsWith("藉萋萋之纤草") OrElse sTmpR.StartsWith("藉槀") OrElse sTmpR.StartsWith("藉在") _
            Then
                Return "jie"
            End If
            Return "ji"
        End If
        If "琢".Equals(sTxt) Then
            If sTmpR.StartsWith("琢磨") Then
                Return "zuo"
            End If
            Return "zhuo"
        End If
        If "圈".Equals(sTxt) Then
            If sTmpL.EndsWith("猪圈") OrElse sTmpL.EndsWith("虎圈") OrElse sTmpL.EndsWith("羊圈") _
               OrElse sTmpL.EndsWith("狗圈") _
            Then
                Return "juan"
            End If
            If sTmpR.StartsWith("圈舍") OrElse sTmpR.StartsWith("圈养") OrElse sTmpR.StartsWith("圈牢") _
               OrElse sTmpR.StartsWith("圈巨狿") OrElse sTmpR.StartsWith("圈闭") OrElse sTmpR.StartsWith("圈禁") _
               OrElse sTmpR.StartsWith("圈留") OrElse sTmpR.StartsWith("圈在家里") OrElse sTmpR.StartsWith("圈属") _
               OrElse sTmpR.StartsWith("圈槛") OrElse sTmpR.StartsWith("圈在家里") OrElse sTmpR.StartsWith("圈属") _
               OrElse sTmpR.StartsWith("圈闳闳") OrElse sTmpR.StartsWith("圈交之") OrElse sTmpR.StartsWith("圈肥") _
            Then
                Return "juan"
            End If
            Return "quan"
        End If
        If "蕉".Equals(sTxt) Then
            If sTmpR.StartsWith("蕉萃") Then
                Return "qiao"
            End If
            Return "jiao"
        End If
        If "壳".Equals(sTxt) Then
            If sTmpL.EndsWith("甲壳") OrElse sTmpL.EndsWith("地壳") OrElse sTmpL.EndsWith("脱壳") _
               OrElse sTmpL.EndsWith("躯壳") OrElse sTmpL.EndsWith("介壳") OrElse sTmpL.EndsWith("枳壳") _
            Then
                Return "qiao"
            End If
            Return "ke"
        End If
        If "吭".Equals(sTxt) Then
            If sTmpR.StartsWith("吭咽") OrElse sTmpR.StartsWith("吭首") OrElse sTmpR.StartsWith("吭嗌") _
               OrElse sTmpR.StartsWith("吭高歌") OrElse sTmpR.StartsWith("xxx") OrElse sTmpR.StartsWith("xxx") _
            Then
                Return "hang"
            End If
            Return "keng"
        End If
        If "蹊".Equals(sTxt) Then
            If sTmpR.StartsWith("蹊跷") Then
                Return "qi"
            End If
            Return "xi"
        End If
        If "卒".Equals(sTxt) Then
            If sTmpL.EndsWith("行西逾陇卒") OrElse sTmpL.EndsWith("仓卒") OrElse sTmpL.EndsWith("则亡以应卒") _
               OrElse sTmpL.EndsWith("卒卒") Then
                Return "cu"
            End If
            If sTmpR.StartsWith("卒惶急") OrElse sTmpR.StartsWith("卒拔") OrElse sTmpR.StartsWith("卒迫") _
               OrElse sTmpR.StartsWith("卒然") OrElse sTmpR.StartsWith("卒倒") OrElse sTmpR.StartsWith("卒暴") _
               OrElse sTmpR.StartsWith("卒卒") OrElse sTmpR.StartsWith("卒中") Then
                Return "cu"
            End If
            Return "zu"
        End If
        If "靓".Equals(sTxt) Then
            If sTmpR.StartsWith("靓姐") OrElse sTmpR.StartsWith("靓女") OrElse sTmpR.StartsWith("靓妞") Then
                Return "liang"
            End If
            Return "jing"
        End If
        If "棱".Equals(sTxt) Then
            If sTmpL.EndsWith("穆棱") Then
                Return "ling"
            End If
            Return "leng"
        End If
        If "缩".Equals(sTxt) Then
            If sTmpR.StartsWith("缩砂") Then
                Return "su"
            End If
            Return "suo"
        End If
        If "且".Equals(sTxt) Then
            If sTmpL.EndsWith("有萋有且") OrElse sTmpL.EndsWith("狂童之狂也且") Then
                Return "ju"
            End If
            Return "qie"
        End If
        If "炮".Equals(sTxt) Then
            If sTmpR.StartsWith("炮干") OrElse sTmpR.StartsWith("炮羊肉") OrElse sTmpR.StartsWith("炮姜") _
            Then
                Return "bao"
            End If
            Return "pao"
        End If
        If "爪".Equals(sTxt) Then
            If sTmpL.EndsWith("鹰爪") OrElse sTmpL.EndsWith("一鳞半爪") OrElse sTmpL.EndsWith("鳞爪") _
               OrElse sTmpL.EndsWith("虎爪") OrElse sTmpL.EndsWith("猫爪") OrElse sTmpL.EndsWith("前爪") _
               OrElse sTmpL.EndsWith("舞爪") OrElse sTmpL.EndsWith("棘爪") OrElse sTmpL.EndsWith("掣爪") _
               OrElse sTmpL.EndsWith("制动爪") Then
                Return "zhao"
            End If
            If sTmpR.StartsWith("爪牙") OrElse sTmpR.StartsWith("爪甲") OrElse sTmpR.StartsWith("爪牙") _
               OrElse sTmpR.StartsWith("爪下") OrElse sTmpR.StartsWith("爪嘴") OrElse sTmpR.StartsWith("爪吻") _
               OrElse sTmpR.StartsWith("爪其肤") OrElse sTmpR.StartsWith("爪足") OrElse sTmpR.StartsWith("爪手") _
               OrElse sTmpR.StartsWith("爪翦") OrElse sTmpR.StartsWith("爪哇") OrElse sTmpR.StartsWith("爪牙") _
            Then
                Return "zhao"
            End If
            Return "zhua"
        End If
        If "烙".Equals(sTxt) Then
            If sTmpL.EndsWith("炮烙") Then
                Return "luo"
            End If
            Return "lao"
        End If
        If "氏".Equals(sTxt) Then
            If sTmpL.EndsWith("月氏") Then
                Return "zhi"
            End If
            Return "shi"
        End If
        If "扛".Equals(sTxt) Then
            If sTmpR.StartsWith("扛鼎") OrElse sTmpR.StartsWith("扛舁") OrElse sTmpR.StartsWith("扛帮") _
               OrElse sTmpR.StartsWith("扛哄") OrElse sTmpR.StartsWith("扛住") OrElse sTmpR.StartsWith("扛抬") _
            Then
                Return "gang"
            End If
            Return "kang"
        End If
        If "夹".Equals(sTxt) Then
            If sTmpR.StartsWith("夹肢窝") Then
                Return "ga"
            End If
            Return "jia"
        End If
        If "浅".Equals(sTxt) Then
            If sTmpR.StartsWith("浅浅流水") Then
                Return "jian"
            End If
            Return "qian"
        End If
        If "奢".Equals(sTxt) Then
            If sTmpR.StartsWith("奢崇明") Then
                Return "sha"
            End If
            Return "she"
        End If
        If "槟".Equals(sTxt) Then
            If sTmpR.StartsWith("槟榔") Then
                Return "bing"
            End If
            Return "bin"
        End If
        If "枸".Equals(sTxt) Then
            If sTmpL.EndsWith("枳枸") Then
                Return "ju"
            End If
            If sTmpR.StartsWith("枸酱") OrElse sTmpR.StartsWith("枸橼") Then
                Return "ju"
            End If
            Return "gou"
        End If
        If "兹".Equals(sTxt) Then
            If sTmpL.EndsWith("龟兹") Then
                Return "ci"
            End If
            Return "zi"
        End If
        If "尉".Equals(sTxt) Then
            If sTmpR.StartsWith("尉迟") OrElse sTmpR.StartsWith("尉犁") OrElse sTmpR.StartsWith("尉缭子") _
            Then
                Return "yu"
            End If
            Return "wei"
        End If
        If "攒".Equals(sTxt) Then
            If sTmpL.EndsWith("足攒") OrElse sTmpL.EndsWith("积攒") Then
                Return "zan"
            End If
            If sTmpR.StartsWith("攒了") OrElse sTmpR.StartsWith("攒积") OrElse sTmpR.StartsWith("攒粪") _
               OrElse sTmpR.StartsWith("攒钱") OrElse sTmpR.StartsWith("攒够") OrElse sTmpR.StartsWith("攒得") _
               OrElse sTmpR.StartsWith("攒的") Then
                Return "zan"
            End If
            Return "cuan"
        End If
        If "牟".Equals(sTxt) Then
            If sTmpR.StartsWith("牟平") Then
                Return "mu"
            End If
            Return "mou"
        End If
        If "蔓".Equals(sTxt) Then
            If sTmpL.EndsWith("瓜蔓") OrElse sTmpL.EndsWith("大蔓") OrElse sTmpL.EndsWith("爬蔓") _
                OrElse sTmpL.EndsWith("压蔓") Then
                Return "wan"
            End If
            Return "man"
        End If
        If "椑".Equals(sTxt) Then
            If sTmpL.EndsWith("兵椑") Then
                Return "pi"
            End If
            If sTmpR.StartsWith("椑榼") Then
                Return "pi"
            End If
            Return "bei"
        End If
        If "埔".Equals(sTxt) Then
            If sTmpL.EndsWith("黄埔") OrElse sTmpL.EndsWith("柬埔") Then
                Return "pu"
            End If
            Return "bu"
        End If
        If "朴".Equals(sTxt) Then
            If sTmpL.EndsWith("厚朴") Then
                Return "po"
            End If
            If sTmpR.StartsWith("朴刀") OrElse sTmpR.StartsWith("朴鄙") OrElse sTmpR.StartsWith("朴牛") _
               OrElse sTmpR.StartsWith("朴忠") OrElse sTmpR.StartsWith("朴厚") OrElse sTmpR.StartsWith("朴茂") _
               OrElse sTmpR.StartsWith("朴硝") Then
                Return "po"
            End If
            Return "pu"
        End If
        If "侧".Equals(sTxt) Then
            If sTmpL.EndsWith("无反无侧") Then
                Return "ze"
            End If
            If sTmpR.StartsWith("侧棱") OrElse sTmpR.StartsWith("侧歪") Then
                Return "zai"
            End If
            If sTmpR.StartsWith("侧弁之俄") Then
                Return "ze"
            End If
            Return "ce"
        End If
        If "迫".Equals(sTxt) Then
            If sTmpR.StartsWith("迫击炮") Then
                Return "pai"
            End If
            Return "po"
        End If
        If "抹".Equals(sTxt) Then
            If sTmpL.EndsWith("随手抹") Then
                Return "ma"
            End If
            If sTmpR.StartsWith("抹桌") OrElse sTmpR.StartsWith("抹脸") OrElse sTmpR.StartsWith("抹澡") _
            Then
                Return "ma"
            End If
            Return "mo"
        End If
        If "阙".Equals(sTxt) Then
            If sTmpR.StartsWith("阙地") OrElse sTmpR.StartsWith("阙翦") Then
                Return "jue"
            End If
            Return "que"
        End If
        If "鞘".Equals(sTxt) Then
            If sTmpL.EndsWith("鞭鞘") Then
                Return "shao"
            End If
            Return "qiao"
        End If
        If "铅".Equals(sTxt) Then
            If sTmpR.StartsWith("铅山") OrElse sTmpR.StartsWith("铅氏") Then
                Return "yan"
            End If
            Return "qian"
        End If
        If "粹".Equals(sTxt) Then
            If sTmpR.StartsWith("粹析") Then
                Return "sui"
            End If
            Return "cui"
        End If
        If "臑".Equals(sTxt) Then
            If sTmpR.StartsWith("臑鳖") OrElse sTmpR.StartsWith("臑若芳些") Then
                Return "er"
            End If
            Return "nao"
        End If
        If "咳".Equals(sTxt) Then
            If sTmpR.StartsWith("咳声叹气") OrElse sTmpR.StartsWith("咳儿") OrElse sTmpR.StartsWith("咳婴") _
            Then
                Return "hai"
            End If
            Return "ke"
        End If
        If "省".Equals(sTxt) Then
            If sTmpL.EndsWith("反省") OrElse sTmpL.EndsWith("内省") OrElse sTmpL.EndsWith("昏定而晨省") _
               OrElse sTmpL.EndsWith("不省") OrElse sTmpL.EndsWith("自省") OrElse sTmpL.EndsWith("深省") _
               OrElse sTmpL.EndsWith("猛省") Then
                Return "xing"
            End If
            If sTmpR.StartsWith("省耕") OrElse sTmpR.StartsWith("省吾身") OrElse sTmpR.StartsWith("省月试") _
               OrElse sTmpR.StartsWith("省心改过") OrElse sTmpR.StartsWith("省牲之所") OrElse sTmpR.StartsWith("省兄河南") _
               OrElse sTmpR.StartsWith("省过贾母") OrElse sTmpR.StartsWith("省拜") OrElse sTmpR.StartsWith("省宫闱") _
               OrElse sTmpR.StartsWith("省候") OrElse sTmpR.StartsWith("省晨") OrElse sTmpR.StartsWith("省问") _
               OrElse sTmpR.StartsWith("省墓") OrElse sTmpR.StartsWith("省会") OrElse sTmpR.StartsWith("省谕") _
               OrElse sTmpR.StartsWith("省释") OrElse sTmpR.StartsWith("省察") OrElse sTmpR.StartsWith("省亲") _
               OrElse sTmpR.StartsWith("省视") OrElse sTmpR.StartsWith("省悟") _
            Then
                Return "xing"
            End If
            Return "sheng"
        End If
        If "厦".Equals(sTxt) Then
            If sTmpL.EndsWith("鹰厦") Then
                Return "xia"
            End If
            If sTmpR.StartsWith("厦门") Then
                Return "xia"
            End If
            Return "sha"
        End If
        If "似".Equals(sTxt) Then
            If sTmpR.StartsWith("似的") Then
                Return "shi"
            End If
            Return "si"
        End If
        If "棓".Equals(sTxt) Then
            If sTmpR.StartsWith("棓击") Then
                Return "bang"
            End If
            Return "bei"
        End If
        If "杓".Equals(sTxt) Then
            If sTmpL.EndsWith("斗杓") Then
                Return "biao"
            End If
            Return "shao"
        End If
        If "撮".Equals(sTxt) Then
            If sTmpL.EndsWith("一撮") OrElse sTmpL.EndsWith("一小撮") Then
                Return "zuo"
            End If
            Return "cuo"
        End If
        If "俟".Equals(sTxt) Then
            If sTmpL.EndsWith("万俟") Then
                Return "qi"
            End If
            Return "si"
        End If
        If "稽".Equals(sTxt) Then
            If sTmpR.StartsWith("稽首") Then
                Return "qi"
            End If
            Return "ji"
        End If
        If "蓼".Equals(sTxt) Then
            If sTmpL.EndsWith("蓼蓼") OrElse sTmpR.StartsWith("蓼蓼") Then
                Return "lu"
            End If
            Return "liao"
        End If
        If "拓".Equals(sTxt) Then
            If sTmpR.StartsWith("拓林") Then
                Return "zhi"
            End If
            If sTmpR.StartsWith("拓印") OrElse sTmpR.StartsWith("拓之本") OrElse sTmpR.StartsWith("拓工") _
               OrElse sTmpR.StartsWith("拓手") OrElse sTmpR.StartsWith("拓本") OrElse sTmpR.StartsWith("拓片") _
               OrElse sTmpR.StartsWith("拓墨") OrElse sTmpR.StartsWith("拓取") OrElse sTmpR.StartsWith("拓来") _
               OrElse sTmpR.StartsWith("拓写") _
            Then
                Return "ta"
            End If
            Return "tuo"
        End If
        If "褪".Equals(sTxt) Then
            Return "tui"
        End If
        If "袜".Equals(sTxt) Then
            If sTmpR.StartsWith("袜肚") OrElse sTmpR.StartsWith("袜腹") OrElse sTmpR.StartsWith("袜首") _
               OrElse sTmpR.StartsWith("袜额") OrElse sTmpR.StartsWith("袜胸") _
            Then
                Return "mo"
            End If
            Return "wa"
        End If
        If "蔚".Equals(sTxt) Then
            If sTmpR.StartsWith("蔚结") Then
                Return "yu"
            End If
            Return "wei"
        End If
        If "圩".Equals(sTxt) Then
            If sTmpL.EndsWith("赶圩") OrElse sTmpL.EndsWith("逛圩") Then
                Return "xu"
            End If
            If sTmpR.StartsWith("圩埠") OrElse sTmpR.StartsWith("圩场") OrElse sTmpR.StartsWith("圩日") _
               OrElse sTmpR.StartsWith("圩市") OrElse sTmpR.StartsWith("圩镇") _
            Then
                Return "xu"
            End If
            Return "wei"
        End If
        If "戌".Equals(sTxt) Then
            If sTmpL.EndsWith("屈戌") Then
                Return "qu"
            End If
            Return "xu"
        End If
        If "磻".Equals(sTxt) Then
            Return "pan"
        End If
        If "骀".Equals(sTxt) Then
            If sTmpL.EndsWith("骀骀") Then
                Return "dai"
            End If
            If sTmpR.StartsWith("骀荡") OrElse sTmpR.StartsWith("骀骀") OrElse sTmpR.StartsWith("骀青春无际") _
               OrElse sTmpR.StartsWith("骀荡") OrElse sTmpR.StartsWith("骀荡") _
            Then
                Return "dai"
            End If
            Return "tai"
        End If

        If "嚣".Equals(sTxt) Then
            If sTmpL.EndsWith("嚣嚣") Then
                Return "ao"
            End If
            If sTmpR.StartsWith("嚣嚣") Then
                Return "ao"
            End If
            Return "xiao"
        End If
        If "茄".Equals(sTxt) Then
            If sTmpL.EndsWith("雪茄") Then
                Return "jia"
            End If
            If sTmpR.StartsWith("茄房") OrElse sTmpR.StartsWith("茄袋") OrElse sTmpR.StartsWith("茄克") _
            Then
                Return "jia"
            End If
            Return "qie"
        End If
        If "泌".Equals(sTxt) Then
            If sTmpR.StartsWith("泌之洋洋") OrElse sTmpR.StartsWith("泌阳") Then
                Return "bi"
            End If
            Return "mi"
        End If
        If "幢".Equals(sTxt) Then
            If sTmpR.StartsWith("幢愚") OrElse sTmpR.StartsWith("一幢") OrElse sTmpR.StartsWith("两幢") _
               OrElse sTmpR.StartsWith("幢相") OrElse sTmpR.StartsWith("抚鸿幢") Then
                Return "zhuang"
            End If
            Return "chuang"
        End If
        If "择".Equals(sTxt) Then
            If sTmpR.StartsWith("择菜") OrElse sTmpR.StartsWith("择不开") OrElse sTmpR.StartsWith("择开") _
               OrElse sTmpR.StartsWith("择席") Then
                Return "zai"
            End If
            Return "ze"
        End If
        If "粘".Equals(sTxt) Then
            If sTmpR.StartsWith("粘锅") Then
                Return "zhan"
            End If
            Return "nian"
        End If
        If "赚".Equals(sTxt) Then
            Return "zhuan"
        End If
        If "缏".Equals(sTxt) Then
            Return "bian"
        End If
        If "臧".Equals(sTxt) Then
            Return "zang"
        End If
        If "殖".Equals(sTxt) Then
            If sTmpL.EndsWith("骨殖") Then
                Return "shi"
            End If
            Return "zhi"
        End If
        If "褶".Equals(sTxt) Then
            If sTmpR.StartsWith("褶裤") OrElse sTmpR.StartsWith("褶服") OrElse sTmpR.StartsWith("褶衣") _
            Then
                Return "xi"
            End If
            Return "zhe"
        End If
        If "虾".Equals(sTxt) Then
            If sTmpR.StartsWith("虾蟆") Then
                Return "ha"
            End If
            Return "xia"
        End If
        If "徵".Equals(sTxt) Then
            Return "zhi"
        End If
        If "串".Equals(sTxt) Then
            If sTmpR.StartsWith("串狎") Then
                Return "guan"
            End If
            Return "chuan"
        End If
        If "澄".Equals(sTxt) Then
            If sTmpR.StartsWith("澄沙") OrElse sTmpR.StartsWith("澄泥") OrElse sTmpR.StartsWith("澄汰") _
            Then
                Return "deng"
            End If
            Return "cheng"
        End If
        If "拆".Equals(sTxt) Then
            Return "chai"
        End If
        If "嘲".Equals(sTxt) Then
            If sTmpR.StartsWith("嘲惹") OrElse sTmpR.StartsWith("嘲哳") Then
                Return "zhao"
            End If
            Return "chao"
        End If
        If "茈".Equals(sTxt) Then
            If sTmpL.EndsWith("凫茈") Then
                Return "ci"
            End If
            Return "zi"
        End If
        If "畜".Equals(sTxt) Then
            If sTmpL.EndsWith("幼畜") OrElse sTmpL.EndsWith("牲畜") OrElse sTmpL.EndsWith("家畜") _
               OrElse sTmpL.EndsWith("六畜") OrElse sTmpL.EndsWith("田畜") OrElse sTmpL.EndsWith("大畜") _
               OrElse sTmpL.EndsWith("小畜") OrElse sTmpL.EndsWith("家养谓之畜") OrElse sTmpL.EndsWith("马畜") _
            Then
                Return "chu"
            End If
            If sTmpR.StartsWith("畜肥") OrElse sTmpR.StartsWith("畜力") OrElse sTmpR.StartsWith("畜疫") _
               OrElse sTmpR.StartsWith("畜生") OrElse sTmpR.StartsWith("畜牧") OrElse sTmpR.StartsWith("畜圈") _
               OrElse sTmpR.StartsWith("畜栏") OrElse sTmpR.StartsWith("畜群") Then
                Return "chu"
            End If
            Return "xu"
        End If
        If "绰".Equals(sTxt) Then
            If sTmpR.StartsWith("绰枪上马") OrElse sTmpR.StartsWith("绰起") OrElse sTmpR.StartsWith("绰经") _
            Then
                Return "chao"
            End If
            Return "chuo"
        End If
        If "偲".Equals(sTxt) Then
            If sTmpL.EndsWith("美偲") OrElse sTmpL.EndsWith("美且偲") Then
                Return "cai"
            End If
            Return "si"
        End If
        If "啜".Equals(sTxt) Then
            Return "chuo"
        End If
        If "耙".Equals(sTxt) Then
            If sTmpL.EndsWith("齿耙") Then
                Return "ba"
            End If
            If sTmpR.StartsWith("耙地") OrElse sTmpR.StartsWith("耙路") OrElse sTmpR.StartsWith("耙碎") _
            Then
                Return "ba"
            End If
            Return "pa"
        End If
        If "芍".Equals(sTxt) Then
            If sTmpR.StartsWith("芍陂") Then
                Return "que"
            End If
            Return "shao"
        End If
        If "噎".Equals(sTxt) Then
            Return "ye"
        End If
        If "拽".Equals(sTxt) Then
            If sTmpR.StartsWith("拽步") OrElse sTmpR.StartsWith("拽扶") OrElse sTmpR.StartsWith("拽扎") _
            Then
                Return "ye"
            End If
            Return "zhuai"
        End If
        If "喳".Equals(sTxt) Then
            Return "zha"
        End If
        If "嗔".Equals(sTxt) Then
            Return "chen"
        End If
        If "蛾".Equals(sTxt) Then
            Return "e"
        End If
        If "佃".Equals(sTxt) Then
            If sTmpL.EndsWith("齐侯至自佃") Then
                Return "tian"
            End If
            If sTmpR.StartsWith("佃作") OrElse sTmpR.StartsWith("佃具") OrElse sTmpR.StartsWith("佃器") _
               OrElse sTmpR.StartsWith("佃以渔") OrElse sTmpR.StartsWith("佃渔") _
            Then
                Return "tian"
            End If
            Return "dian"
        End If
        If "伧".Equals(sTxt) Then
            If sTmpL.EndsWith("寒伧") Then
                Return "chen"
            End If
            Return "cang"
        End If
        If "仰".Equals(sTxt) Then
            If sTmpL.EndsWith("仰仰") Then
                Return "ang"
            End If
            If sTmpR.StartsWith("仰仰") OrElse sTmpR.StartsWith("仰首伸眉") Then
                Return "ang"
            End If
            Return "yang"
        End If
        If "沓".Equals(sTxt) Then
            If sTmpL.EndsWith("一沓") Then
                Return "da"
            End If
            If sTmpR.StartsWith("沓卷") OrElse sTmpR.StartsWith("沓纸") Then
                Return "da"
            End If
            Return "ta"
        End If
        If "掺".Equals(sTxt) Then
            If sTmpL.EndsWith("即有殊掺") Then
                Return "shan"
            End If
            If sTmpR.StartsWith("掺掺女手") OrElse sTmpR.StartsWith("掺女手") OrElse sTmpR.StartsWith("掺执") _
               OrElse sTmpR.StartsWith("掺袂") OrElse sTmpR.StartsWith("xxx") OrElse sTmpR.StartsWith("xxx") _
            Then
                Return "shan"
            End If
            Return "chan"
        End If
        If "惝".Equals(sTxt) Then
            If sTmpR.StartsWith("惝恍") Then
                Return "chang"
            End If
            Return "tang"
        End If
        If "噌".Equals(sTxt) Then
            If sTmpR.StartsWith("噌吰") Then
                Return "cheng"
            End If
            Return "ceng"
        End If
        If "嚼".Equals(sTxt) Then
            If sTmpL.EndsWith("咀嚼") OrElse sTmpL.EndsWith("过屠门而大嚼") OrElse sTmpL.EndsWith("嚼嚼") _
            Then
                Return "jue"
            End If
            If sTmpR.StartsWith("嚼血") OrElse sTmpR.StartsWith("嚼嚼") OrElse sTmpR.StartsWith("嚼子") _
            Then
                Return "jue"
            End If
            Return "jiao"
        End If
        If "栖".Equals(sTxt) Then
            If sTmpL.EndsWith("栖栖") Then
                Return "xi"
            End If
            If sTmpR.StartsWith("栖栖") OrElse sTmpR.StartsWith("栖屑") OrElse sTmpR.StartsWith("栖遑") OrElse sTmpR.StartsWith("栖惶") _
            Then
                Return "xi"
            End If
            Return "qi"
        End If
        If "缴".Equals(sTxt) Then
            Return "jiao"
        End If
        If "蹴".Equals(sTxt) Then
            If sTmpL.EndsWith("圪蹴") Then
                Return "jiu"
            End If
            Return "cu"
        End If
        If "偈".Equals(sTxt) Then
            If sTmpL.EndsWith("偈偈") Then
                Return "jie"
            End If
            If sTmpR.StartsWith("偈偈") Then
                Return "jie"
            End If
            Return "ji"
        End If
        If "伺".Equals(sTxt) Then
            If sTmpR.StartsWith("伺候") Then
                Return "ci"
            End If
            Return "si"
        End If
        If "咀".Equals(sTxt) Then
            Return "ju"
        End If
        If "槛".Equals(sTxt) Then
            If sTmpL.EndsWith("门槛") Then
                Return "kan"
            End If
            Return "jian"
        End If
        If "楷".Equals(sTxt) Then
            If sTmpR.StartsWith("楷树") OrElse sTmpR.StartsWith("楷木") OrElse sTmpR.StartsWith("楷床") Then
                Return "jie"
            End If
            Return "kai"
        End If
        If "砌".Equals(sTxt) Then
            If sTmpL.EndsWith("杂砌") OrElse sTmpL.EndsWith("俺怕不占场儿砌") Then
                Return "qie"
            End If
            If sTmpR.StartsWith("砌末") OrElse sTmpR.StartsWith("楷木") OrElse sTmpR.StartsWith("楷床") Then
                Return "qie"
            End If
            Return "qi"
        End If
        If "啐".Equals(sTxt) Then
            Return "cui"
        End If
        If "栎".Equals(sTxt) Then
            If sTmpR.StartsWith("栎阳") Then
                Return "yue"
            End If
            Return "li"
        End If
        If "瘥".Equals(sTxt) Then
            If sTmpL.EndsWith("无天昏札瘥") OrElse sTmpL.EndsWith("天方荐瘥") OrElse sTmpL.EndsWith("瘥夭昏") _
               OrElse sTmpL.EndsWith("之瘥") Then
                Return "cuo"
            End If
            If sTmpR.StartsWith("瘥疠") OrElse sTmpR.StartsWith("瘥夭昏") OrElse sTmpR.StartsWith("瘥札") _
               OrElse sTmpR.StartsWith("瘥瘼") OrElse sTmpR.StartsWith("瘥昏") _
            Then
                Return "cuo"
            End If
            Return "chai"
        End If
        If "孱".Equals(sTxt) Then
            If sTmpR.StartsWith("孱头") Then
                Return "can"
            End If
            Return "chan"
        End If
        If "蠡".Equals(sTxt) Then
            Return "li"
        End If
        If "獠".Equals(sTxt) Then
            Return "liao"
        End If
        If "褚".Equals(sTxt) Then
            If sTmpR.StartsWith("褚伍") Then
                Return "zhe"
            End If
            Return "zhu"
        End If
        If "谜".Equals(sTxt) Then
            Return "mi"
        End If
        If "缪".Equals(sTxt) Then
            If sTmpL.EndsWith("绸缪") Then
                Return "mou"
            End If
            Return "miu"
        End If
        If "氓".Equals(sTxt) Then
            If sTmpL.EndsWith("流氓") Then
                Return "mang"
            End If
            Return "meng"
        End If
        If "糜".Equals(sTxt) Then
            If sTmpL.EndsWith("糜黍") Then
                Return "mei"
            End If
            If sTmpR.StartsWith("糜子") Then
                Return "mei"
            End If
            Return "mi"
        End If
        If "咋".Equals(sTxt) Then
            If sTmpL.EndsWith("崖崩岭咋") Then
                Return "zha"
            End If
            If sTmpR.StartsWith("咋舌") OrElse sTmpR.StartsWith("咋唬") OrElse sTmpR.StartsWith("咋呼") Then
                Return "zha"
            End If
            Return "za"
        End If
        If "喏".Equals(sTxt) Then
            If sTmpL.EndsWith("唱喏") Then
                Return "re"
            End If
            Return "nuo"
        End If
        If "刨".Equals(sTxt) Then
            If sTmpR.StartsWith("刨坑") OrElse sTmpR.StartsWith("刨花生") OrElse sTmpR.StartsWith("刨食") _
               OrElse sTmpR.StartsWith("刨黄") OrElse sTmpR.StartsWith("刨除") OrElse sTmpR.StartsWith("刨分") _
               OrElse sTmpR.StartsWith("刨根") OrElse sTmpR.StartsWith("刨祖") OrElse sTmpR.StartsWith("刨去") _
            Then
                Return "pao"
            End If
            Return "bao"
        End If
        If "蛆".Equals(sTxt) Then
            If sTmpL.EndsWith("蝍蛆") Then
                Return "ju"
            End If
            Return "qu"
        End If
        If "鹄".Equals(sTxt) Then
            If sTmpR.StartsWith("鹄子") OrElse sTmpR.StartsWith("鹄的") Then
                Return "gu"
            End If
            Return "hu"
        End If
        If "荛".Equals(sTxt) Then
            If sTmpR.StartsWith("荛花") Then
                Return "yao"
            End If
            Return "rao"
        End If
        If "杉".Equals(sTxt) Then
            If sTmpR.StartsWith("杉篙") Then
                Return "sha"
            End If
            Return "shan"
        End If
        If "圌".Equals(sTxt) Then
            If sTmpR.StartsWith("圌廪") Then
                Return "chuan"
            End If
            Return "chui"
        End If
        If "裳".Equals(sTxt) Then
            If sTmpL.EndsWith("黄裳") Then
                Return "chang"
            End If
            If sTmpR.StartsWith("裳下饰也") OrElse sTmpR.StartsWith("裳元吉") OrElse sTmpR.StartsWith("裳衣") _
               OrElse sTmpR.StartsWith("裳服") OrElse sTmpR.StartsWith("裳裾") OrElse sTmpR.StartsWith("裳袂") _
               OrElse sTmpR.StartsWith("裳裙") _
            Then
                Return "chang"
            End If
            Return "shang"
        End If
        If "峙".Equals(sTxt) Then
            If sTmpL.EndsWith("繁峙") Then
                Return "zhi"
            End If
            Return "shi"
        End If
        If "挝".Equals(sTxt) Then
            If sTmpL.EndsWith("老挝") Then
                Return "wo"
            End If
            Return "zhua"
        End If
        If "吁".Equals(sTxt) Then
            If sTmpL.EndsWith("呼吁") OrElse sTmpL.EndsWith("呴吁") Then
                Return "yu"
            End If
            If sTmpR.StartsWith("吁天") OrElse sTmpR.StartsWith("吁号") OrElse sTmpR.StartsWith("吁求") _
            Then
                Return "yu"
            End If
            Return "xu"
        End If
        If "於".Equals(sTxt) Then
            If sTmpR.StartsWith("於鹊") OrElse sTmpR.StartsWith("於乎") OrElse sTmpR.StartsWith("於戏") _
               OrElse sTmpR.StartsWith("於菟") Then
                Return "wu"
            End If
            Return "yu"
        End If
        If "诧".Equals(sTxt) Then
            If sTmpR.StartsWith("诧异") Then
                Return "cha"
            End If
            Return "zha"
        End If
        If "酢".Equals(sTxt) Then
            If sTmpL.EndsWith("酬酢") OrElse sTmpL.EndsWith("献酢") Then
                Return "zuo"
            End If
            If sTmpR.StartsWith("酢爵") Then
                Return "zuo"
            End If
            Return "cu"
        End If

        If "啁".Equals(sTxt) Then
            Return "zhou"
        End If
        If "咤".Equals(sTxt) Then
            If sTmpL.EndsWith("眼咤") Then
                Return "cha"
            End If
            Return "zha"
        End If
        If "楂".Equals(sTxt) Then
            If sTmpL.EndsWith("盘楂") Then
                Return "cha"
            End If
            Return "zha"
        End If
        If "蹲".Equals(sTxt) Then
            Return "dun"
        End If
        If "澹".Equals(sTxt) Then
            If sTmpR.StartsWith("澹台") Then
                Return "tan"
            End If
            Return "dan"
        End If
        If "曝".Equals(sTxt) Then
            Return "bao"
        End If

        If "喋".Equals(sTxt) Then
            If sTmpL.EndsWith("喋呷") Then
                Return "zha"
            End If
            Return "die"
        End If
        If "叨".Equals(sTxt) Then
            If sTmpR.StartsWith("叨光") OrElse sTmpR.StartsWith("叨教") OrElse sTmpR.StartsWith("叨陪") _
               OrElse sTmpR.StartsWith("叨扰") Then
                Return "tao"
            End If
            Return "dao"
        End If
        If "掸".Equals(sTxt) Then
            If sTmpR.StartsWith("掸邦") Then
                Return "shan"
            End If
            Return "dan"
        End If
        If "汶".Equals(sTxt) Then
            If sTmpL.EndsWith("汶汶") OrElse sTmpR.StartsWith("汶汶") Then
                Return "men"
            End If
            Return "wen"
        End If
        If "垌".Equals(sTxt) Then
            If sTmpR.StartsWith("垌冢") Then
                Return "tong"
            End If
            Return "dong"
        End If
        If "町".Equals(sTxt) Then
            If sTmpL.EndsWith("畹町") Then
                Return "ding"
            End If
            Return "ting"
        End If
        If "铤".Equals(sTxt) Then
            Return "ting"
        End If
        If "仿".Equals(sTxt) Then
            Return "fang"
        End If
        If "渎".Equals(sTxt) Then
            Return "du"
        End If
        If "哏".Equals(sTxt) Then
            Return "gen"
        End If
        If "镐".Equals(sTxt) Then
            If sTmpR.StartsWith("镐京") Then
                Return "hao"
            End If
            Return "gao"
        End If
        If "鬲".Equals(sTxt) Then
            If sTmpR.StartsWith("鬲如") Then
                Return "li"
            End If
            Return "ge"
        End If
        If "呱".Equals(sTxt) Then
            Return "gua"
        End If
        If "绠".Equals(sTxt) Then
            Return "geng"
        End If
        If "肋".Equals(sTxt) Then
            If sTmpR.StartsWith("肋脦") Then
                Return "le"
            End If
            Return "lei"
        End If
        If "莞".Equals(sTxt) Then
            If sTmpL.EndsWith("胃莞") Then
                Return "wan"
            End If
            If sTmpR.StartsWith("莞纳") OrElse sTmpR.StartsWith("莞收") OrElse sTmpR.StartsWith("莞尔") _
            Then
                Return "wan"
            End If
            Return "guan"
        End If
        If "夯".Equals(sTxt) Then
            If sTmpR.StartsWith("夯汉") OrElse sTmpR.StartsWith("夯货") Then
                Return "ben"
            End If
            Return "hang"
        End If
        If "蛤".Equals(sTxt) Then
            If sTmpR.StartsWith("蛤蟆") Then
                Return "ha"
            End If
            Return "ge"
        End If
        If "浒".Equals(sTxt) Then
            If sTmpR.StartsWith("浒墅关") OrElse sTmpR.StartsWith("浒浦") Then
                Return "xu"
            End If
            Return "hu"
        End If
        If "侗".Equals(sTxt) Then
            If sTmpL.EndsWith("倥侗") OrElse sTmpL.EndsWith("毋侗") OrElse sTmpL.EndsWith("在后之侗") _
               OrElse sTmpL.EndsWith("侗侗") OrElse sTmpL.EndsWith("能侗") Then
                Return "tong"
            End If
            If sTmpR.StartsWith("侗而不愿") OrElse sTmpR.StartsWith("侗长") OrElse sTmpR.StartsWith("侗侗") _
            Then
                Return "tong"
            End If
            Return "dong"
        End If
        If "隽".Equals(sTxt) Then
            If sTmpL.EndsWith("英隽") Then
                Return "tong"
            End If
            If sTmpR.StartsWith("隽才") OrElse sTmpR.StartsWith("隽乂英旄") OrElse sTmpR.StartsWith("隽良") _
               OrElse sTmpR.StartsWith("隽材") OrElse sTmpR.StartsWith("隽武") OrElse sTmpR.StartsWith("隽拔") _
               OrElse sTmpR.StartsWith("隽辅") OrElse sTmpR.StartsWith("隽英") OrElse sTmpR.StartsWith("隽士") _
               OrElse sTmpR.StartsWith("隽言妙语") OrElse sTmpR.StartsWith("隽公车") _
            Then
                Return "jun"
            End If
            Return "juan"
        End If
        If "炕".Equals(sTxt) Then
            Return "kang"
        End If
        If "隗".Equals(sTxt) Then
            Return "wei"
        End If
        If "荼".Equals(sTxt) Then
            If sTmpL.EndsWith("诸侯御荼") Then
                Return "shu"
            End If
            If sTmpR.StartsWith("荼缓") Then
                Return "shu"
            End If
            Return "tu"
        End If
        If "湫".Equals(sTxt) Then
            If sTmpR.StartsWith("湫隘") OrElse sTmpR.StartsWith("湫仄") OrElse sTmpR.StartsWith("湫阨") _
               OrElse sTmpR.StartsWith("湫凹") OrElse sTmpR.StartsWith("湫居") Then
                Return "jiao"
            End If
            If sTmpR.StartsWith("湫然") Then
                Return "jiu"
            End If
            Return "qiu"
        End If
        If "渎".Equals(sTxt) Then
            Return "du"
        End If
        If "捻".Equals(sTxt) Then
            If sTmpR.StartsWith("捻土成香") OrElse sTmpR.StartsWith("捻") OrElse sTmpR.StartsWith("捻着鼻子") _
               OrElse sTmpR.StartsWith("捻香") OrElse sTmpR.StartsWith("捻掿") OrElse sTmpR.StartsWith("捻管") OrElse sTmpR.StartsWith("捻船") _
            Then
                Return "nie"
            End If
            Return "nian"
        End If
        If "疟".Equals(sTxt) Then
            If sTmpR.StartsWith("疟子") Then
                Return "yao"
            End If
            Return "nue"
        End If
        If "瀼".Equals(sTxt) Then
            If sTmpL.EndsWith("泱瀼") Then
                Return "nang"
            End If
            Return "rang"
        End If
        If "庶".Equals(sTxt) Then
            If sTmpR.StartsWith("庶虫") OrElse sTmpR.StartsWith("庶氏下士一人") Then
                Return "zhu"
            End If
            Return "shu"
        End If
        If "恫".Equals(sTxt) Then
            If sTmpL.EndsWith("神网时恫") Then
                Return "dong"
            End If
            If sTmpR.StartsWith("恫恐") OrElse sTmpR.StartsWith("恫震") OrElse sTmpR.StartsWith("恫惧") _
               OrElse sTmpR.StartsWith("恫胁") OrElse sTmpR.StartsWith("恫骇") OrElse sTmpR.StartsWith("恫喝") _
               OrElse sTmpR.StartsWith("恫扰") OrElse sTmpR.StartsWith("恫吓") Then
                Return "dong"
            End If
            Return "tong"
        End If
        If "峤".Equals(sTxt) Then
            If sTmpR.StartsWith("峤道") OrElse sTmpR.StartsWith("峤路") OrElse sTmpR.StartsWith("峤南") _
               OrElse sTmpR.StartsWith("峤外") Then
                Return "jiao"
            End If
            Return "qiao"
        End If
        If "揲".Equals(sTxt) Then
            If sTmpR.StartsWith("揲舞衣归未得") Then
                Return "die"
            End If
            Return "she"
        End If
        If "螫".Equals(sTxt) Then
            Return "shi"
        End If
        If "貉".Equals(sTxt) Then
            Return "hao"
        End If
        If "阽".Equals(sTxt) Then
            Return "dian"
        End If
        If "眩".Equals(sTxt) Then
            Return "xuan"
        End If
        If "殷".Equals(sTxt) Then
            If sTmpR.StartsWith("殷红") OrElse sTmpR.StartsWith("殷妍") Then
                Return "yan"
            End If
            Return "yin"
        End If
        If "窨".Equals(sTxt) Then
            Return "yin"
        End If
        If "荑".Equals(sTxt) Then
            Return "ti"
        End If
        If "熨".Equals(sTxt) Then
            If sTmpR.StartsWith("熨帖") Then
                Return "yu"
            End If
            Return "yun"
        End If
        If "铫".Equals(sTxt) Then
            Return "yao"
        End If
        If "絜".Equals(sTxt) Then
            Return "xie"
        End If
        If "仡".Equals(sTxt) Then
            If sTmpR.StartsWith("仡佬") Then
                Return "ge"
            End If
            Return "yi"
        End If
        If "栅".Equals(sTxt) Then
            If sTmpL.EndsWith("上栅") OrElse sTmpL.EndsWith("下栅") Then
                Return "ce"
            End If
            If sTmpL.EndsWith("光栅") Then
                Return "shan"
            End If
            If sTmpR.StartsWith("栅极") Then
                Return "shan"
            End If
            Return "zha"
        End If
        If "莩".Equals(sTxt) Then
            If sTmpL.EndsWith("葭莩") Then
                Return "fu"
            End If
            Return "piao"
        End If
        If "阏".Equals(sTxt) Then
            If sTmpR.StartsWith("阏氏") Then
                Return "yan"
            End If
            Return "e"
        End If
        If "堨".Equals(sTxt) Then
            If sTmpL.EndsWith("富堨") Then
                Return "ye"
            End If
            If sTmpL.EndsWith("扬尘起堨") Then
                Return "ai"
            End If
            Return "e"
        End If
        If "肮".Equals(sTxt) Then
            If sTmpL.EndsWith("绝肮") Then
                Return "hang"
            End If
            Return "ang"
        End If
        If "咶".Equals(sTxt) Then
            If sTmpL.EndsWith("噔咚扎咶") Then
                Return "huai"
            End If
            If sTmpL.EndsWith("伏而咶") Then
                Return "shi"
            End If
            Return "guo"
        End If
        If "涡".Equals(sTxt) Then
            If sTmpR.StartsWith("涡河") Then
                Return "guo"
            End If
            Return "wo"
        End If
        If "枹".Equals(sTxt) Then
            If sTmpR.StartsWith("枹端") OrElse sTmpR.StartsWith("枹鼓") Then
                Return "fu"
            End If
            Return "bao"
        End If
        If "桁".Equals(sTxt) Then
            If sTmpR.StartsWith("桁杨") OrElse sTmpR.StartsWith("桁渡") Then
                Return "hang"
            End If
            Return "heng"
        End If
        If "匙".Equals(sTxt) Then
            If sTmpL.EndsWith("茶匙") OrElse sTmpL.EndsWith("汤匙") OrElse sTmpL.EndsWith("儿匙") _
            Then
                Return "chi"
            End If
            If sTmpR.StartsWith("匙子") Then
                Return "chi"
            End If
            Return "shi"
        End If
        If "擿".Equals(sTxt) Then
            If sTmpR.StartsWith("擿匕") OrElse sTmpR.StartsWith("擿弃") Then
                Return "zhi"
            End If
            Return "ti"
        End If
        If "潦".Equals(sTxt) Then
            If sTmpR.StartsWith("潦旱") OrElse sTmpR.StartsWith("潦灾") OrElse sTmpR.StartsWith("潦岁") _
            Then
                Return "lao"
            End If
            Return "liao"
        End If
        If "怫".Equals(sTxt) Then
            If sTmpR.StartsWith("怫郁") OrElse sTmpR.StartsWith("怫忾") Then
                Return "fu"
            End If
            Return "fei"
        End If
        If "咖".Equals(sTxt) Then
            If sTmpR.StartsWith("咖啡") Then
                Return "ka"
            End If
            Return "ga"
        End If
        If "噱".Equals(sTxt) Then
            If sTmpL.EndsWith("可发一噱") OrElse sTmpL.EndsWith("噱噱") OrElse sTmpL.EndsWith("谈笑大噱") _
               OrElse sTmpL.EndsWith("遥噱虖") OrElse sTmpL.EndsWith("口内之上下名为噱") Then
                Return "jue"
            End If
            If sTmpR.StartsWith("噱谈") OrElse sTmpR.StartsWith("噱噱") Then
                Return "jue"
            End If
            Return "xue"
        End If
        If "戆".Equals(sTxt) Then
            If sTmpR.StartsWith("戆头戆脑") OrElse sTmpR.StartsWith("戆脑") OrElse sTmpR.StartsWith("戆言") _
               OrElse sTmpR.StartsWith("戆激") Then
                Return "gang"
            End If
            Return "zhuang"
        End If
        If "汩".Equals(sTxt) Then
            If sTmpL.EndsWith("悲风汩") Then
                Return "yu"
            End If
            If sTmpR.StartsWith("汩徂") OrElse sTmpR.StartsWith("汩话") OrElse sTmpR.StartsWith("汩流") _
               OrElse sTmpR.StartsWith("汩越") Then
                Return "yu"
            End If
            Return "gu"
        End If
        If "哕".Equals(sTxt) Then
            If sTmpL.EndsWith("哕哕") OrElse sTmpL.EndsWith("声哕") Then
                Return "hui"
            End If
            If sTmpR.StartsWith("哕哕") Then
                Return "hui"
            End If
            Return "yue"
        End If
        If "赣".Equals(sTxt) Then
            Return "gan"
        End If
        If "桔".Equals(sTxt) Then
            If sTmpL.EndsWith("红桔") OrElse sTmpL.EndsWith("黄桔") OrElse sTmpL.EndsWith("青桔") _
              OrElse sTmpL.EndsWith("柑桔") Then
                Return "ju"
            End If
            If sTmpR.StartsWith("桔皮") OrElse sTmpR.StartsWith("桔子") OrElse sTmpR.StartsWith("桔绿") _
                OrElse sTmpR.StartsWith("桔红") OrElse sTmpR.StartsWith("桔黄") OrElse sTmpR.StartsWith("桔青") _
                OrElse sTmpR.StartsWith("桔色") _
             Then
                Return "ju"
            End If
            Return "jie"
        End If
        If "浚".Equals(sTxt) Then
            If sTmpR.StartsWith("浚县") Then
                Return "xun"
            End If
            Return "jun"
        End If
        If "雇".Equals(sTxt) Then
            If sTmpL.EndsWith("九雇") Then
                Return "hu"
            End If
            Return "gu"
        End If
        If "珲".Equals(sTxt) Then
            If sTmpR.StartsWith("珲春") Then
                Return "hun"
            End If
            Return "hui"
        End If
        If "桧".Equals(sTxt) Then
            If sTmpL.EndsWith("秦桧") Then
                Return "hui"
            End If
            Return "gui"
        End If
        If "鲑".Equals(sTxt) Then
            Return "gui"
        End If
        If "鹘".Equals(sTxt) Then
            If sTmpR.StartsWith("鹘仑吞枣") Then
                Return "hu"
            End If
            Return "gu"
        End If
        If "纥".Equals(sTxt) Then
            If sTmpR.StartsWith("纥地") OrElse sTmpR.StartsWith("纥刺星") Then
                Return "ge"
            End If
            Return "he"
        End If
        If "偻".Equals(sTxt) Then
            If sTmpL.EndsWith("佝偻") OrElse sTmpR.StartsWith("偻儸") Then
                Return "lou"
            End If
            Return "lv"
        End If
        If "姥".Equals(sTxt) Then
            If sTmpL.EndsWith("老姥") OrElse sTmpL.EndsWith("公姥") Then
                Return "mu"
            End If
            Return "lao"
        End If
        If "脯".Equals(sTxt) Then
            If sTmpL.EndsWith("胸脯") OrElse sTmpL.EndsWith("鸡脯") Then
                Return "pu"
            End If
            If sTmpR.StartsWith("脯子") Then
                Return "pu"
            End If
            Return "fu"
        End If
        If "氿".Equals(sTxt) Then
            If sTmpL.EndsWith("东氿") OrElse sTmpL.EndsWith("西氿") Then
                Return "jiu"
            End If
            Return "gui"
        End If
        If "炅".Equals(sTxt) Then
            Return "jiong"
        End If
        If "僮".Equals(sTxt) Then
            If sTmpR.StartsWith("僮族") Then
                Return "zhuang"
            End If
            Return "tong"
        End If
        If "馘".Equals(sTxt) Then
            Return "guo"
        End If
        If "荥".Equals(sTxt) Then
            If sTmpR.StartsWith("荥阳") Then
                Return "xing"
            End If
            Return "ying"
        End If
        If "疸".Equals(sTxt) Then
            If sTmpL.EndsWith("疙疸") Then
                Return "da"
            End If
            Return "dan"
        End If
        If "沌".Equals(sTxt) Then
            If sTmpR.StartsWith("沌口") Then
                Return "zhuan"
            End If
            Return "dun"
        End If
        If "郇".Equals(sTxt) Then
            Return "huan"
        End If
        If "浍".Equals(sTxt) Then
            Return "hui"
        End If
        If "嗨".Equals(sTxt) Then
            Return "hai"
        End If
        If "唬".Equals(sTxt) Then
            If sTmpR.StartsWith("唬杀") Then
                Return "xia"
            End If
            Return "hu"
        End If
        If "崴".Equals(sTxt) Then
            If sTmpR.StartsWith("崴嵬") Then
                Return "wei"
            End If
            Return "wai"
        End If
        If "嘿".Equals(sTxt) Then
            If sTmpL.EndsWith("嘿嘿") OrElse sTmpR.StartsWith("嘿嘿") Then
                Return "hei"
            End If
            Return "mo"
        End If
        If "亟".Equals(sTxt) Then
            If sTmpR.StartsWith("亟请") OrElse sTmpR.StartsWith("亟叹") Then
                Return "qi"
            End If
            Return "ji"
        End If
        If "葭".Equals(sTxt) Then
            Return "jia"
        End If
        If "珩".Equals(sTxt) Then
            If sTmpR.StartsWith("珩磨") Then
                Return "hang"
            End If
            Return "heng"
        End If
        If "苕".Equals(sTxt) Then
            If sTmpL.EndsWith("红苕") Then
                Return "shao"
            End If
            Return "tiao"
        End If
        If "峒".Equals(sTxt) Then
            If sTmpL.EndsWith("崆峒") Then
                Return "tong"
            End If
            Return "dong"
        End If
        If "芫".Equals(sTxt) Then
            If sTmpR.StartsWith("芫荽") Then
                Return "yan"
            End If
            Return "yuan"
        End If
        If "筠".Equals(sTxt) Then
            If sTmpR.StartsWith("筠连") Then
                Return "jun"
            End If
            Return "yun"
        End If
        If "丌".Equals(sTxt) Then
            Return "qi"
        End If
        If "埏".Equals(sTxt) Then
            If sTmpR.StartsWith("埏埴") OrElse sTmpR.StartsWith("埏揉") OrElse sTmpR.StartsWith("埏稾") _
            Then
                Return "shan"
            End If
            Return "yan"
        End If
        If "麇".Equals(sTxt) Then
            If sTmpR.StartsWith("麇聚") OrElse sTmpR.StartsWith("麇集") OrElse sTmpR.StartsWith("麇至") _
               OrElse sTmpR.StartsWith("麇居") OrElse sTmpR.StartsWith("xxx") OrElse sTmpR.StartsWith("xxx") _
            Then
                Return "qun"
            End If
            Return "jun"
        End If
        If "栝".Equals(sTxt) Then
            If sTmpL.EndsWith("箭无栝") Then
                Return "kuo"
            End If
            Return "gua"
        End If
        If "袢".Equals(sTxt) Then
            If sTmpL.EndsWith("袷袢") Then
                Return "pan"
            End If
            If sTmpR.StartsWith("袢袄") Then
                Return "pan"
            End If
            Return "fan"
        End If
        If "圻".Equals(sTxt) Then
            If sTmpL.EndsWith("无圻") Then
                Return "yin"
            End If
            Return "qi"
        End If
        If "侥".Equals(sTxt) Then
            If sTmpL.EndsWith("僬侥") Then
                Return "yao"
            End If
            Return "jiao"
        End If
        If "嶷".Equals(sTxt) Then
            If sTmpL.EndsWith("九嶷") Then
                Return "yi"
            End If
            Return "ni"
        End If
        If "嚓".Equals(sTxt) Then
            If sTmpL.EndsWith("喀嚓") OrElse sTmpL.EndsWith("啪嚓") Then
                Return "cha"
            End If
            Return "ca"
        End If
        If "哩".Equals(sTxt) Then
            Return "li"
        End If
        If "夭".Equals(sTxt) Then
            Return "yao"
        End If
        If "辗".Equals(sTxt) Then
            Return "zhan"
        End If
        If "綮".Equals(sTxt) Then
            If sTmpL.EndsWith("肯綮") Then
                Return "qing"
            End If
            Return "qi"
        End If
        If "嘬".Equals(sTxt) Then
            If sTmpL.EndsWith("嘬嘬") Then
                Return "chuai"
            End If
            If sTmpR.StartsWith("嘬樘") OrElse sTmpR.StartsWith("嘬嘬") Then
                Return "chuai"
            End If
            Return "zuo"
        End If
        If "拶".Equals(sTxt) Then
            If sTmpL.EndsWith("排拶") OrElse sTmpL.EndsWith("拶拶") Then
                Return "za"
            End If
            If sTmpR.StartsWith("拶拆") OrElse sTmpR.StartsWith("拶逼") OrElse sTmpR.StartsWith("拶拶") OrElse sTmpR.StartsWith("拶榨") Then
                Return "za"
            End If
            Return "zan"
        End If
        If "嘘".Equals(sTxt) Then
            Return "xu"
        End If
        If "苣".Equals(sTxt) Then
            If sTmpR.StartsWith("苣卖菜") Then
                Return "qu"
            End If
            Return "ju"
        End If

        If "徼".Equals(sTxt) Then
            If sTmpR.StartsWith("徼怨") OrElse sTmpR.StartsWith("徼祸") OrElse sTmpR.StartsWith("徼乱") _
               OrElse sTmpR.StartsWith("徼天") OrElse sTmpR.StartsWith("徼名") OrElse sTmpR.StartsWith("徼功") _
               OrElse sTmpR.StartsWith("徼求") OrElse sTmpR.StartsWith("徼利") OrElse sTmpR.StartsWith("徼劫") _
               OrElse sTmpR.StartsWith("徼极") _
            Then
                Return "yao"
            End If
            Return "jiao"
        End If
        If "焌".Equals(sTxt) Then
            Return "jun"
        End If
        If "翟".Equals(sTxt) Then
            Return "di"
        End If
        If "楛".Equals(sTxt) Then
            If sTmpR.StartsWith("楛矢") Then
                Return "hu"
            End If
            Return "ku"
        End If
        If "跞".Equals(sTxt) Then
            If sTmpL.EndsWith("卓跞") Then
                Return "luo"
            End If
            Return "li"
        End If
        If "铻".Equals(sTxt) Then
            If sTmpL.EndsWith("鉏铻") Then
                Return "yu"
            End If
            Return "wu"
        End If
        If "泷".Equals(sTxt) Then
            If sTmpR.StartsWith("泷水") Then
                Return "shuang"
            End If
            Return "long"
        End If
        If "癞".Equals(sTxt) Then
            If sTmpR.StartsWith("癞痢") Then
                Return "la"
            End If
            Return "lai"
        End If
        If "莨".Equals(sTxt) Then
            If sTmpL.EndsWith("薯莨") Then
                Return "liang"
            End If
            If sTmpR.StartsWith("莨绸") Then
                Return "liang"
            End If
            Return "lang"
        End If
        If "裼".Equals(sTxt) Then
            Return "xi"
        End If
        If "楯".Equals(sTxt) Then
            If sTmpL.EndsWith("执楯") OrElse sTmpL.EndsWith("誉楯") Then
                Return "dun"
            End If
            Return "shun"
        End If
        If "捋".Equals(sTxt) Then
            If sTmpR.StartsWith("捋臂") OrElse sTmpR.StartsWith("捋起") Then
                Return "luo"
            End If
            Return "lv"
        End If
        If "倩".Equals(sTxt) Then
            If sTmpR.StartsWith("倩人") OrElse sTmpR.StartsWith("倩代") OrElse sTmpR.StartsWith("倩笔") _
               OrElse sTmpR.StartsWith("倩雇") OrElse sTmpR.StartsWith("倩霜") Then
                Return "qing"
            End If
            Return "qian"
        End If
        If "觜".Equals(sTxt) Then
            If sTmpR.StartsWith("觜宿") OrElse sTmpR.StartsWith("觜一") OrElse sTmpR.StartsWith("觜二") _
               OrElse sTmpR.StartsWith("觜三") OrElse sTmpR.StartsWith("觜觽") OrElse sTmpR.StartsWith("觜陬") Then
                Return "zi"
            End If
            Return "zui"
        End If
        If "嘞".Equals(sTxt) Then
            If sTmpL.EndsWith("嘞嘞") OrElse sTmpR.StartsWith("嘞嘞") Then
                Return "le"
            End If
            Return "lei"
        End If
        If "趄".Equals(sTxt) Then
            If sTmpL.EndsWith("趄趄") Then
                Return "ju"
            End If
            If sTmpR.StartsWith("趑趄") OrElse sTmpR.StartsWith("趄趄") OrElse sTmpR.StartsWith("xxx") _
               OrElse sTmpR.StartsWith("趄尘") Then
                Return "ju"
            End If
            Return "qie"
        End If
        If "渑".Equals(sTxt) Then
            If sTmpL.EndsWith("渑池") Then
                Return "mian"
            End If
            Return "sheng"
        End If
        If "尨".Equals(sTxt) Then
            If sTmpR.StartsWith("尨茸") Then
                Return "meng"
            End If
            If sTmpR.StartsWith("尨然") Then
                Return "pang"
            End If
            Return "mang"
        End If
        If "黾".Equals(sTxt) Then
            If sTmpR.StartsWith("黾勉") Then
                Return "min"
            End If
            Return "meng"
        End If
        If "俛".Equals(sTxt) Then
            If sTmpL.EndsWith("僶俛") OrElse sTmpL.EndsWith("黾俛") Then
                Return "mian"
            End If
            Return "fu"
        End If
        If "呐".Equals(sTxt) Then
            Return "na"
        End If
        If "乜".Equals(sTxt) Then
            Return "mie"
        End If
        If "呶".Equals(sTxt) Then
            If sTmpL.EndsWith("呶呶") OrElse sTmpL.EndsWith("喧呶") Then
                Return "nao"
            End If
            If sTmpR.StartsWith("呶拏") OrElse sTmpR.StartsWith("呶呶") OrElse sTmpR.StartsWith("呶嚷") _
            Then
                Return "nao"
            End If
            Return "nu"
        End If
        If "囤".Equals(sTxt) Then
            If sTmpL.EndsWith("积囤") Then
                Return "tun"
            End If
            If sTmpR.StartsWith("囤塌") OrElse sTmpR.StartsWith("囤积") OrElse sTmpR.StartsWith("囤货") _
               OrElse sTmpR.StartsWith("囤粮") OrElse sTmpR.StartsWith("囤户") OrElse sTmpR.StartsWith("囤集") _
               OrElse sTmpR.StartsWith("囤聚") _
            Then
                Return "tun"
            End If
            Return "dun"
        End If
        If "哦".Equals(sTxt) Then
            If sTmpL.EndsWith("吟哦") Then
                Return "e"
            End If
            Return "o"
        End If
        If "圜".Equals(sTxt) Then
            If sTmpR.StartsWith("圜视") OrElse sTmpR.StartsWith("圜流") OrElse sTmpR.StartsWith("圜凿") _
               OrElse sTmpR.StartsWith("圜山") Then
                Return "huan"
            End If
            Return "yuan"
        End If
        If "娉".Equals(sTxt) Then
            If sTmpR.StartsWith("娉婷") Then
                Return "ping"
            End If
            Return "pin"
        End If
        If "彷".Equals(sTxt) Then
            If sTmpL.EndsWith("模彷") OrElse sTmpL.EndsWith("相彷") OrElse sTmpL.EndsWith("xxx") _
            Then
                Return "fang"
            End If
            If sTmpR.StartsWith("彷彿") OrElse sTmpR.StartsWith("彷洋") OrElse sTmpR.StartsWith("彷佯") _
               OrElse sTmpR.StartsWith("彷髴") Then
                Return "fang"
            End If
            Return "pang"
        End If

        If "睥".Equals(sTxt) Then
            If sTmpR.StartsWith("睥睨") Then
                Return "pi"
            End If
            Return "bi"
        End If
        If "杷".Equals(sTxt) Then
            If sTmpL.EndsWith("枇杷") Then
                Return "pa"
            End If
            Return "ba"
        End If
        If "莘".Equals(sTxt) Then
            If sTmpL.EndsWith("细莘") Then
                Return "xin"
            End If
            If sTmpR.StartsWith("莘庄") Then
                Return "xin"
            End If
            Return "shen"
        End If
        If "玢".Equals(sTxt) Then
            If sTmpL.EndsWith("赛璐玢") Then
                Return "fen"
            End If
            Return "bin"
        End If
        If "倘".Equals(sTxt) Then
            If sTmpR.StartsWith("倘佯") Then
                Return "chang"
            End If
            Return "tang"
        End If
        If "覃".Equals(sTxt) Then
            Return "tan"
        End If
        If "驮".Equals(sTxt) Then
            If sTmpR.StartsWith("驮垛") OrElse sTmpR.StartsWith("驮担") OrElse sTmpR.StartsWith("驮装") _
               OrElse sTmpR.StartsWith("驮子") Then
                Return "duo"
            End If
            Return "tuo"
        End If
        If "歙".Equals(sTxt) Then
            If sTmpR.StartsWith("歙砚") OrElse sTmpR.StartsWith("歙县") OrElse sTmpR.StartsWith("歙漆阿胶") Then
                Return "she"
            End If
            Return "xi"
        End If
        If "铣".Equals(sTxt) Then
            If sTmpR.StartsWith("铣泽") OrElse sTmpR.StartsWith("铣树") OrElse sTmpR.StartsWith("铣珧") OrElse sTmpR.StartsWith("铣铁") Then
                Return "xian"
            End If
            Return "xi"
        End If
        If "翟".Equals(sTxt) Then
            Return "di"
        End If
        If "艿".Equals(sTxt) Then
            If sTmpR.StartsWith("艿稗") Then
                Return "reng"
            End If
            Return "nai"
        End If
        If "腌".Equals(sTxt) Then
            If sTmpR.StartsWith("腌臜") Then
                Return "a"
            End If
            Return "yan"
        End If
        If "枞".Equals(sTxt) Then
            If sTmpR.StartsWith("枞阳") Then
                Return "zong"
            End If
            Return "cong"
        End If
        If "螲".Equals(sTxt) Then
            If sTmpR.StartsWith("螲蟷") Then
                Return "die"
            End If
            Return "zhi"
        End If
        If "蓂".Equals(sTxt) Then
            If sTmpL.EndsWith("菥蓂") Then
                Return "mi"
            End If
            Return "ming"
        End If
        If "挲".Equals(sTxt) Then
            Return "sha"
        End If
        If "拚".Equals(sTxt) Then
            Return "pin"
        End If
        If "茜".Equals(sTxt) Then
            Return "qian"
        End If
        If "蛸".Equals(sTxt) Then
            If sTmpL.EndsWith("蟰蛸") Then
                Return "shao"
            End If
            Return "xiao"
        End If
        If "籧".Equals(sTxt) Then
            If sTmpR.StartsWith("籧筐") Then
                Return "qu"
            End If
            Return "ju"
        End If
        If "繇".Equals(sTxt) Then
            If sTmpL.EndsWith("成风闻成季之繇") Then
                Return "zhou"
            End If
            If sTmpR.StartsWith("繇子") Then
                Return "you"
            End If
            If sTmpR.StartsWith("繇词") OrElse sTmpR.StartsWith("繇文") Then
                Return "zhou"
            End If
            Return "yao"
        End If

        If "蝤".Equals(sTxt) Then
            If sTmpL.EndsWith("蜉蝤") Then
                Return "you"
            End If
            If sTmpR.StartsWith("蝤蛑") Then
                Return "you"
            End If
            Return "qiu"
        End If
        If "郄".Equals(sTxt) Then
            Return "xi"
        End If
        If "溱".Equals(sTxt) Then
            If sTmpR.StartsWith("溱潼") Then
                Return "qin"
            End If
            Return "zhen"
        End If

        If "卬".Equals(sTxt) Then
            If sTmpR.StartsWith("卬车") OrElse sTmpR.StartsWith("卬否") Then
                Return "ang"
            End If
            Return "yang"
        End If
        If "昳".Equals(sTxt) Then
            If sTmpR.StartsWith("昳丽") Then
                Return "yi"
            End If
            Return "die"
        End If
        If "葚".Equals(sTxt) Then
            If sTmpL.EndsWith("桑葚") Then
                Return "reng"
            End If
            Return "shen"
        End If
        If "忪".Equals(sTxt) Then
            If sTmpL.EndsWith("惺忪") Then
                Return "song"
            End If
            Return "zhong"
        End If
        If "穇".Equals(sTxt) Then
            If sTmpL.EndsWith("稴穇") Then
                Return "shan"
            End If
            Return "can"
        End If
        If "躅".Equals(sTxt) Then
            If sTmpL.EndsWith("低回遗躅") Then
                Return "zhuo"
            End If
            If sTmpR.StartsWith("躅路") OrElse sTmpR.StartsWith("躅于蕙路") Then
                Return "zhuo"
            End If
            Return "zhu"
        End If
        If "桲".Equals(sTxt) Then
            If sTmpL.EndsWith("榅桲") Then
                Return "po"
            End If
            Return "bo"
        End If
        If "柈".Equals(sTxt) Then
            If sTmpR.StartsWith("柈飧") OrElse sTmpR.StartsWith("柈馔") OrElse sTmpR.StartsWith("柈貯槟榔") Then
                Return "pan"
            End If
            Return "ban"
        End If
        If "噫".Equals(sTxt) Then
            If sTmpR.StartsWith("噫气") OrElse sTmpR.StartsWith("噫欠") Then
                Return "ai"
            End If
            Return "yi"
        End If
        If "亹".Equals(sTxt) Then
            If sTmpL.EndsWith("凫鹭在亹") Then
                Return "men"
            End If
            If sTmpR.StartsWith("亹者") OrElse sTmpR.StartsWith("亹源") OrElse sTmpR.StartsWith("亹隘") Then
                Return "men"
            End If
            Return "wei"
        End If
        If "娭".Equals(sTxt) Then
            If sTmpR.StartsWith("娭毑") OrElse sTmpR.StartsWith("娭她") Then
                Return "ai"
            End If
            Return "xi"
        End If
        If "荨".Equals(sTxt) Then
            If sTmpR.StartsWith("荨麻疹") Then
                Return "xun"
            End If
            Return "qian"
        End If
        If "砉".Equals(sTxt) Then
            If sTmpR.StartsWith("砉划") OrElse sTmpR.StartsWith("砉騞") OrElse sTmpR.StartsWith("砉欻") Then
                Return "xu"
            End If
            Return "hua"
        End If
        If "褎".Equals(sTxt) Then
            If sTmpL.EndsWith("豹褎") Then
                Return "xiu"
            End If
            Return "you"
        End If
        If "糁".Equals(sTxt) Then
            If sTmpL.EndsWith("高粱糁") OrElse sTmpL.EndsWith("玉米糁") Then
                Return "shen"
            End If
            If sTmpR.StartsWith("糁盆") Then
                Return "shen"
            End If
            Return "san"
        End If
        If "斁".Equals(sTxt) Then
            If sTmpL.EndsWith("法斁") OrElse sTmpL.EndsWith("耗斁") Then
                Return "du"
            End If
            If sTmpR.StartsWith("斁圮") OrElse sTmpR.StartsWith("斁败") OrElse sTmpR.StartsWith("斁坏") _
               OrElse sTmpR.StartsWith("斁伦") Then
                Return "du"
            End If
            Return "yi"
        End If
        If "柚".Equals(sTxt) Then
            If sTmpL.EndsWith("杼柚") Then
                Return "zhu"
            End If
            Return "you"
        End If
        If "炔".Equals(sTxt) Then
            Return "que"
        End If
        If "佁".Equals(sTxt) Then
            If sTmpL.EndsWith("没身不佁") Then
                Return "ai"
            End If
            If sTmpR.StartsWith("佁儗") Then
                Return "chi"
            End If
            Return "yi"
        End If
        If "剡".Equals(sTxt) Then
            If sTmpR.StartsWith("剡溪") OrElse sTmpR.StartsWith("剡楮") OrElse sTmpR.StartsWith("剡纸") _
               OrElse sTmpR.StartsWith("剡藤") Then
                Return "shan"
            End If
            Return "yan"
        End If
        If "喁".Equals(sTxt) Then
            If sTmpL.EndsWith("唱喁") Then
                Return "yu"
            End If
            Return "yong"
        End If
        If "瘈".Equals(sTxt) Then
            If sTmpL.EndsWith("狂瘈") Then
                Return "zhi"
            End If
            If sTmpR.StartsWith("瘈狗") Then
                Return "zhi"
            End If
            Return "chi"
        End If

        If "嘏".Equals(sTxt) Then
            Return "gu"
        End If
        If "篢".Equals(sTxt) Then
            Return "long"
        End If
        If "舳".Equals(sTxt) Then
            If sTmpL.EndsWith("船后曰舳") OrElse sTmpL.EndsWith("若无辑舳") OrElse sTmpL.EndsWith("青雀黄龙之舳") _
            Then
                Return "zhu"
            End If
            If sTmpR.StartsWith("舳舻") Then
                Return "zhu"
            End If
            Return "zhou"
        End If
        If "焘".Equals(sTxt) Then
            Return "dao"
        End If
        If "楤".Equals(sTxt) Then
            Return "song"
        End If
        If "菀".Equals(sTxt) Then
            If sTmpR.StartsWith("菀结") OrElse sTmpR.StartsWith("菀热") Then
                Return "yu"
            End If
            Return "wan"
        End If
        If "鳜".Equals(sTxt) Then
            If sTmpR.StartsWith("鳜鯞") Then
                Return "jue"
            End If
            Return "gui"
        End If
        If "椹".Equals(sTxt) Then
            If sTmpR.StartsWith("椹质") OrElse sTmpR.StartsWith("椹板") OrElse sTmpR.StartsWith("椹斧") _
            Then
                Return "zhen"
            End If
            Return "shen"
        End If
        If "踡".Equals(sTxt) Then
            Return "quan"
        End If
        If "尢".Equals(sTxt) Then
            Return "you"
        End If
        If "倞".Equals(sTxt) Then
            Return "jing"
        End If
        If "漯".Equals(sTxt) Then
            If sTmpR.StartsWith("漯河") Then
                Return "luo"
            End If
            Return "lei"
        End If
        If "硌".Equals(sTxt) Then
            If sTmpL.EndsWith("磊硌") OrElse sTmpL.EndsWith("磥硌") Then
                Return "luo"
            End If
            If sTmpR.StartsWith("硌石") OrElse sTmpR.StartsWith("硌硌若石") OrElse sTmpR.StartsWith("硌若石") Then
                Return "luo"
            End If
            Return "ge"
        End If
        If "熇".Equals(sTxt) Then
            If sTmpR.StartsWith("熇焚") OrElse sTmpR.StartsWith("熇燥") Then
                Return "kao"
            End If
            Return "he"
        End If
        If "咥".Equals(sTxt) Then
            If sTmpL.EndsWith("咥咥") Then
                Return "xi"
            End If
            If sTmpR.StartsWith("咥然") OrElse sTmpR.StartsWith("咥咥") Then
                Return "xi"
            End If
            Return "die"
        End If
        If "蹢".Equals(sTxt) Then
            If sTmpL.EndsWith("白蹢") Then
                Return "di"
            End If
            Return "zhi"
        End If
        If "酾".Equals(sTxt) Then
            Return "shi"
        End If
        If "箄".Equals(sTxt) Then
            Return "bi"
        End If
        If "焯".Equals(sTxt) Then
            If sTmpR.StartsWith("焯菠菜") OrElse sTmpR.StartsWith("焯菜") OrElse sTmpR.StartsWith("焯化") Then
                Return "chao"
            End If
            Return "zhuo"
        End If
        If "慊".Equals(sTxt) Then
            If sTmpL.EndsWith("自慊") Then
                Return "qie"
            End If
            Return "qian"
        End If
        If "笮".Equals(sTxt) Then
            If sTmpR.StartsWith("笮桥") Then
                Return "zuo"
            End If
            Return "ze"
        End If



        If "xxx".Equals(sTxt) Then
            If sTmpL.EndsWith("xxx") OrElse sTmpL.EndsWith("xxx") OrElse sTmpL.EndsWith("xxx") _
               OrElse sTmpL.EndsWith("xxx") OrElse sTmpL.EndsWith("xxx") OrElse sTmpL.EndsWith("xxx") _
            Then
                Return "xxx"
            End If
            If sTmpR.StartsWith("xxx") OrElse sTmpR.StartsWith("xxx") OrElse sTmpR.StartsWith("xxx") _
               OrElse sTmpR.StartsWith("xxx") OrElse sTmpR.StartsWith("xxx") OrElse sTmpR.StartsWith("xxx") _
            Then
                Return "xxx"
            End If
            Return "xxx"
        End If

        Return GetPinyinMap()(sTxt)      ' 用字典含逗号的多音字
    End Function



End Module